gcc/testsuite/gcc.dg/compat/struct-by-value-17_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(cd, _Complex double)
   8 CHECKS(cd, _Complex double)
   9
  10 TEST(Scd1, _Complex double)
  11 TEST(Scd2, _Complex double)
  12 TEST(Scd3, _Complex double)
  13 TEST(Scd4, _Complex double)
  14 TEST(Scd5, _Complex double)
  15 TEST(Scd6, _Complex double)
  16 TEST(Scd7, _Complex double)
  17 TEST(Scd8, _Complex double)
  18 TEST(Scd9, _Complex double)
  19 TEST(Scd10, _Complex double)
  20 TEST(Scd11, _Complex double)
  21 TEST(Scd12, _Complex double)
  22
  23
  24 #undef T
  25
  26 void
  27 struct_by_value_17_x ()
  28 {
  29 DEBUG_INIT
  30
  31 #define T(TYPE, MTYPE) testit##TYPE ();
  32
  33 T(Scd1, _Complex double)
  34 T(Scd2, _Complex double)
  35 T(Scd3, _Complex double)
  36 T(Scd4, _Complex double)
  37 T(Scd5, _Complex double)
  38 T(Scd6, _Complex double)
  39 T(Scd7, _Complex double)
  40 T(Scd8, _Complex double)
  41 T(Scd9, _Complex double)
  42 T(Scd10, _Complex double)
  43 T(Scd11, _Complex double)
  44 T(Scd12, _Complex double)
  45
  46
  47 DEBUG_FINI
  48
  49 if (fails != 0)
  50   abort ();
  51
  52 #undef T
  53 }