gcc/testsuite/gcc.dg/compat/struct-by-value-14_x.c

   1 #include "compat-common.h"
   2
   3 #include "fp-struct-defs.h"
   4 #include "fp-struct-check.h"
   5 #include "fp-struct-test-by-value-x.h"
   6
   7 DEFS(cl, _Complex long)
   8 CHECKS(cl, _Complex long)
   9
  10 TEST(Scl1, _Complex long)
  11 TEST(Scl2, _Complex long)
  12 TEST(Scl3, _Complex long)
  13 TEST(Scl4, _Complex long)
  14 TEST(Scl5, _Complex long)
  15 TEST(Scl6, _Complex long)
  16 TEST(Scl7, _Complex long)
  17 TEST(Scl8, _Complex long)
  18 TEST(Scl9, _Complex long)
  19 TEST(Scl10, _Complex long)
  20 TEST(Scl11, _Complex long)
  21 TEST(Scl12, _Complex long)
  22 TEST(Scl13, _Complex long)
  23 TEST(Scl14, _Complex long)
  24 TEST(Scl15, _Complex long)
  25 TEST(Scl16, _Complex long)
  26
  27 #undef T
  28
  29 void
  30 struct_by_value_14_x ()
  31 {
  32 DEBUG_INIT
  33
  34 #define T(TYPE, MTYPE) testit##TYPE ();
  35
  36 T(Scl1, _Complex long)
  37 T(Scl2, _Complex long)
  38 T(Scl3, _Complex long)
  39 T(Scl4, _Complex long)
  40 T(Scl5, _Complex long)
  41 T(Scl6, _Complex long)
  42 T(Scl7, _Complex long)
  43 T(Scl8, _Complex long)
  44 T(Scl9, _Complex long)
  45 T(Scl10, _Complex long)
  46 T(Scl11, _Complex long)
  47 T(Scl12, _Complex long)
  48 T(Scl13, _Complex long)
  49 T(Scl14, _Complex long)
  50 T(Scl15, _Complex long)
  51 T(Scl16, _Complex long)
  52
  53 DEBUG_FINI
  54
  55 if (fails != 0)
  56   abort ();
  57
  58 #undef T
  59 }