sdcc/support/regression/tests/gcc-torture-execute-loop-3c.c

   1 /*
   2    loop-4c.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 #include <limits.h>
  12
  13 #if (!defined(__SDCC_mcs51) || defined(__SDCC_MODEL_LARGE) || defined(__SDCC_MODEL_HUGE)) && !defined(__SDCC_pdk13) && !defined(__SDCC_pdk14) && !defined(__SDCC_pdk15) // Lack of memory
  14 void * a[255];
  15
  16 void f (int m)
  17 {
  18   int i;
  19   int sh = 0x100;
  20   i = m;
  21   do
  22     {
  23       a[sh >>= 1] = ((unsigned)i << 3)  + (char*)a;
  24       i += 4;
  25     }
  26   while (i < INT_MAX/2 + 1 + 4 * 4);
  27 }
  28 #endif
  29
  30 void
  31 testTortureExecute (void)
  32 {
  33 #if (!defined(__SDCC_mcs51) || defined(__SDCC_MODEL_LARGE) || defined(__SDCC_MODEL_HUGE)) && !defined(__SDCC_pdk13) && !defined(__SDCC_pdk14) && !defined(__SDCC_pdk15) // Lack of memory
  34   a[0x10] = 0;
  35   a[0x08] = 0;
  36   f (INT_MAX/2 + INT_MAX/4 + 2);
  37   if (a[0x10] || a[0x08])
  38     ASSERT (0);
  39   a[0x10] = 0;
  40   a[0x08] = 0;
  41   f (INT_MAX/2 + 1);
  42   if (! a[0x10] || a[0x08])
  43     ASSERT (0);
  44 #endif
  45   return;
  46 }
  47