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

   1 /*
   2    980506-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 struct decision
  12 {
  13   char enforce_mode;
  14   struct decision *next;
  15 };
  16
  17
  18 static void
  19 clear_modes (register struct decision *p)
  20 {
  21   goto blah;
  22
  23 foo:
  24   p->enforce_mode = 0;
  25 blah:
  26   if (p)
  27     goto foo;
  28 }
  29
  30 void
  31 testTortureExecute (void)
  32 {
  33   struct decision *p = 0;
  34   clear_modes (p);
  35   return;
  36 }
  37