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

   1 /*
   2    930518-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 int bar = 0;
  12
  13 void
  14 f (int *p)
  15 {
  16   int foo = 2;
  17
  18   while (foo > bar)
  19     {
  20       foo -=  bar;
  21       *p++ = foo;
  22       bar = 1;
  23     }
  24 }
  25
  26 void
  27 testTortureExecute (void)
  28 {
  29   int tab[2];
  30   tab[0] = tab[1] = 0;
  31   f (tab);
  32   ASSERT(!(tab[0] != 2 || tab[1] != 1));
  33   return;
  34 }
  35