gcc/testsuite/gcc.dg/compat/struct-by-value-16a_x.c

   1 /* { dg-options "-O1" { target msp430-*-* } } */
   2
   3 #include "compat-common.h"
   4
   5 #include "fp-struct-defs.h"
   6 #include "fp-struct-check.h"
   7 #include "fp-struct-test-by-value-x.h"
   8
   9 #ifndef SKIP_COMPLEX
  10 DEFS(cf, _Complex float)
  11 CHECKS(cf, _Complex float)
  12
  13 TEST(Scf13, _Complex float)
  14 TEST(Scf14, _Complex float)
  15 TEST(Scf15, _Complex float)
  16 TEST(Scf16, _Complex float)
  17 #endif
  18
  19 #undef T
  20
  21 void
  22 struct_by_value_16a_x ()
  23 {
  24 DEBUG_INIT
  25
  26 #define T(TYPE, MTYPE) testit##TYPE ();
  27
  28 #ifndef SKIP_COMPLEX
  29 T(Scf13, _Complex float)
  30 T(Scf14, _Complex float)
  31 T(Scf15, _Complex float)
  32 T(Scf16, _Complex float)
  33 #endif
  34
  35 DEBUG_FINI
  36
  37 if (fails != 0)
  38   abort ();
  39
  40 #undef T
  41 }