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_INT
       8  DEFS(cl, _Complex long)
       9  CHECKS(cl, _Complex long)
      10  
      11  TEST(Scl1, _Complex long)
      12  TEST(Scl2, _Complex long)
      13  TEST(Scl3, _Complex long)
      14  TEST(Scl4, _Complex long)
      15  TEST(Scl5, _Complex long)
      16  TEST(Scl6, _Complex long)
      17  TEST(Scl7, _Complex long)
      18  TEST(Scl8, _Complex long)
      19  TEST(Scl9, _Complex long)
      20  TEST(Scl10, _Complex long)
      21  TEST(Scl11, _Complex long)
      22  TEST(Scl12, _Complex long)
      23  TEST(Scl13, _Complex long)
      24  TEST(Scl14, _Complex long)
      25  TEST(Scl15, _Complex long)
      26  TEST(Scl16, _Complex long)
      27  #endif
      28  
      29  #undef T
      30  
      31  void
      32  struct_by_value_14_x ()
      33  {
      34  #ifndef SKIP_COMPLEX_INT
      35  DEBUG_INIT
      36  
      37  #define T(TYPE, MTYPE) testit##TYPE ();
      38  
      39  T(Scl1, _Complex long)
      40  T(Scl2, _Complex long)
      41  T(Scl3, _Complex long)
      42  T(Scl4, _Complex long)
      43  T(Scl5, _Complex long)
      44  T(Scl6, _Complex long)
      45  T(Scl7, _Complex long)
      46  T(Scl8, _Complex long)
      47  T(Scl9, _Complex long)
      48  T(Scl10, _Complex long)
      49  T(Scl11, _Complex long)
      50  T(Scl12, _Complex long)
      51  T(Scl13, _Complex long)
      52  T(Scl14, _Complex long)
      53  T(Scl15, _Complex long)
      54  T(Scl16, _Complex long)
      55  
      56  DEBUG_FINI
      57  
      58  if (fails != 0)
      59    abort ();
      60  
      61  #undef T
      62  #endif
      63  }