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

   1 /*
   2    20000801-1.c from the execute part of the gcc torture tests.
   3  */
   4
   5 #include <testfwk.h>
   6
   7 #ifdef __SDCC
   8 #pragma std_c99
   9 #endif
  10
  11 void
  12 foo (char *bp, unsigned n)
  13 {
  14   register char c;
  15   register char *ep = bp + n;
  16   register char *sp;
  17
  18   while (bp < ep)
  19     {
  20       sp = bp + 3;
  21       c = *sp;
  22       *sp = *bp;
  23       *bp++ = c;
  24       sp = bp + 1;
  25       c = *sp;
  26       *sp = *bp;
  27       *bp++ = c;
  28       bp += 2;
  29     }
  30 }
  31
  32 void
  33 testTortureExecute (void)
  34 {
  35   int one = 1;
  36
  37   if (sizeof(int) != 4 * sizeof(char))
  38     return;
  39
  40   foo ((char *)&one, sizeof(one));
  41   foo ((char *)&one, sizeof(one));
  42
  43   if (one != 1)
  44     ASSERT (0);
  45
  46   return;
  47 }
  48