sdcc/support/regression/tests/gcc-torture-execute-990531-1.c

   1 /*
   2    990531-1.c from the execute part of the gcc torture suite.
   3  */
   4
   5 #include <testfwk.h>
   6
   7 #ifdef __SDCC
   8 #pragma std_c99
   9 #endif
  10
  11    unsigned long bad(int reg, unsigned long inWord)
  12    {
  13        union {
  14            unsigned long word;
  15            unsigned char byte[4];
  16        } data;
  17
  18        data.word = inWord;
  19        data.byte[reg] = 0;
  20
  21        return data.word;
  22    }
  23
  24 void
  25 testTortureExecute (void)
  26 {
  27   /* XXX This test could be generalized.  */
  28   if (sizeof (long) != 4)
  29     return;
  30
  31   if (bad (0, 0xdeadbeef) == 0xdeadbeef)
  32     ASSERT (0);
  33   return;
  34 }
  35