gcc/testsuite/gcc.dg/compat/struct-by-value-18a_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(cld, _Complex long double)
   8 CHECKS(cld, _Complex long double)
   9
  10
  11 TEST(Scld13, _Complex long double)
  12 TEST(Scld14, _Complex long double)
  13 TEST(Scld15, _Complex long double)
  14 TEST(Scld16, _Complex long double)
  15
  16 #undef T
  17
  18 void
  19 struct_by_value_18a_x ()
  20 {
  21 DEBUG_INIT
  22
  23 #define T(TYPE, MTYPE) testit##TYPE ();
  24
  25
  26 T(Scld13, _Complex long double)
  27 T(Scld14, _Complex long double)
  28 T(Scld15, _Complex long double)
  29 T(Scld16, _Complex long double)
  30
  31 DEBUG_FINI
  32
  33 if (fails != 0)
  34   abort ();
  35
  36 #undef T
  37 }