gcc/testsuite/gcc.dg/compat/struct-by-value-6a_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(d, double)
   8 CHECKS(d, double)
   9
  10 TEST(Sd1, double)
  11 TEST(Sd2, double)
  12 TEST(Sd3, double)
  13 TEST(Sd4, double)
  14 TEST(Sd5, double)
  15 TEST(Sd6, double)
  16 TEST(Sd7, double)
  17 TEST(Sd8, double)
  18
  19 #undef T
  20
  21 void
  22 struct_by_value_6a_x ()
  23 {
  24 DEBUG_INIT
  25
  26 #define T(TYPE, MTYPE) testit##TYPE ();
  27
  28 T(Sd1, double)
  29 T(Sd2, double)
  30 T(Sd3, double)
  31 T(Sd4, double)
  32 T(Sd5, double)
  33 T(Sd6, double)
  34 T(Sd7, double)
  35 T(Sd8, double)
  36
  37 DEBUG_FINI
  38
  39 if (fails != 0)
  40   abort ();
  41
  42 #undef T
  43 }