gcc/testsuite/gcc.dg/compat/struct-by-value-18_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(cld, _Complex long double)
   9 CHECKS(cld, _Complex long double)
  10
  11 TEST(Scld1, _Complex long double)
  12 TEST(Scld2, _Complex long double)
  13 TEST(Scld3, _Complex long double)
  14 TEST(Scld4, _Complex long double)
  15 TEST(Scld5, _Complex long double)
  16 TEST(Scld6, _Complex long double)
  17 TEST(Scld7, _Complex long double)
  18 TEST(Scld8, _Complex long double)
  19 TEST(Scld9, _Complex long double)
  20 TEST(Scld10, _Complex long double)
  21 TEST(Scld11, _Complex long double)
  22 TEST(Scld12, _Complex long double)
  23 #endif
  24
  25 #undef T
  26
  27 void
  28 struct_by_value_18_x ()
  29 {
  30 DEBUG_INIT
  31
  32 #define T(TYPE, MTYPE) testit##TYPE ();
  33
  34 #ifndef SKIP_COMPLEX
  35 T(Scld1, _Complex long double)
  36 T(Scld2, _Complex long double)
  37 T(Scld3, _Complex long double)
  38 T(Scld4, _Complex long double)
  39 T(Scld5, _Complex long double)
  40 T(Scld6, _Complex long double)
  41 T(Scld7, _Complex long double)
  42 T(Scld8, _Complex long double)
  43 T(Scld9, _Complex long double)
  44 T(Scld10, _Complex long double)
  45 T(Scld11, _Complex long double)
  46 T(Scld12, _Complex long double)
  47 #endif
  48
  49 DEBUG_FINI
  50
  51 if (fails != 0)
  52   abort ();
  53
  54 #undef T
  55 }