gcc/testsuite/gcc.dg/compat/struct-by-value-16a_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 #ifndef SKIP_COMPLEX
   8 DEFS(cf, _Complex float)
   9 CHECKS(cf, _Complex float)
  10
  11 TEST(Scf13, _Complex float)
  12 TEST(Scf14, _Complex float)
  13 TEST(Scf15, _Complex float)
  14 TEST(Scf16, _Complex float)
  15 #endif
  16
  17 #undef T
  18
  19 void
  20 struct_by_value_16a_x ()
  21 {
  22 DEBUG_INIT
  23
  24 #define T(TYPE, MTYPE) testit##TYPE ();
  25
  26 #ifndef SKIP_COMPLEX
  27 T(Scf13, _Complex float)
  28 T(Scf14, _Complex float)
  29 T(Scf15, _Complex float)
  30 T(Scf16, _Complex float)
  31 #endif
  32
  33 DEBUG_FINI
  34
  35 if (fails != 0)
  36   abort ();
  37
  38 #undef T
  39 }