(root)/
gcc-13.2.0/
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  #ifndef SKIP_COMPLEX
       8  DEFS(cld, _Complex long double)
       9  CHECKS(cld, _Complex long double)
      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  #endif
      16  
      17  #undef T
      18  
      19  void
      20  struct_by_value_18a_x ()
      21  {
      22  DEBUG_INIT
      23  
      24  #define T(TYPE, MTYPE) testit##TYPE ();
      25  
      26  #ifndef SKIP_COMPLEX
      27  T(Scld13, _Complex long double)
      28  T(Scld14, _Complex long double)
      29  T(Scld15, _Complex long double)
      30  T(Scld16, _Complex long double)
      31  #endif
      32  
      33  DEBUG_FINI
      34  
      35  if (fails != 0)
      36    abort ();
      37  
      38  #undef T
      39  }