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

   1 /*
   2    20000731-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 #pragma disable_warning 93
  10 #endif
  11
  12 double
  13 foo (void)
  14 {
  15   return 0.0;
  16 }
  17
  18 void
  19 do_sibcall (void)
  20 {
  21   (void) foo ();
  22 }
  23
  24 void
  25 testTortureExecute (void)
  26 {
  27 #ifndef __SDCC_pdk14 // Lack of memory
  28 #if !(defined (__SDCC_pdk15) && defined(__SDCC_STACK_AUTO)) // Lack of code memory
  29    double x;
  30
  31    for (x = 0; x < 20; x++)
  32       do_sibcall ();
  33    if (!(x >= 10))
  34       ASSERT (0);
  35    return;
  36 #endif
  37 #endif
  38 }
  39