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

   1 /*
   2    931004-3.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 // Todo: enable when sdcc supports struct passing!
  12 #if 0
  13 struct tiny
  14 {
  15   short c;
  16 };
  17
  18 f (int n, struct tiny x, struct tiny y, struct tiny z, long l)
  19 {
  20   if (x.c != 10)
  21     ASSERT (0);
  22
  23   if (y.c != 11)
  24     ASSERT (0);
  25
  26   if (z.c != 12)
  27     ASSERT (0);
  28
  29   if (l != 123)
  30     ASSERT (0);
  31 }
  32 #endif
  33
  34 void
  35 testTortureExecute (void)
  36 {
  37 #if 0
  38   struct tiny x[3];
  39   x[0].c = 10;
  40   x[1].c = 11;
  41   x[2].c = 12;
  42   f (3, x[0], x[1], x[2], (long) 123);
  43   return;
  44 #endif
  45 }
  46