1 #include "compat-common.h"
3 #include "fp2-struct-defs.h"
4 #include "fp2-struct-check.h"
7 TYPE g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE; \
8 TYPE g5s##TYPE, g6s##TYPE, g7s##TYPE, g8s##TYPE; \
9 TYPE g9s##TYPE, g10s##TYPE, g11s##TYPE, g12s##TYPE; \
10 TYPE g13s##TYPE, g14s##TYPE, g15s##TYPE, g16s##TYPE; \
12 extern void init##TYPE (TYPE *p, double x); \
13 extern void checkg##TYPE (void); \
15 test##TYPE (TYPE s1, TYPE s2, TYPE s3, TYPE s4, \
16 TYPE s5, TYPE s6, TYPE s7, TYPE s8, \
17 TYPE s9, TYPE s10, TYPE s11, TYPE s12, \
18 TYPE s13, TYPE s14, TYPE s15, TYPE s16); \
19 extern void testva##TYPE (int n, ...); \
22 test2_##TYPE (TYPE s1, TYPE s2, TYPE s3, TYPE s4, \
23 TYPE s5, TYPE s6, TYPE s7, TYPE s8) \
25 test##TYPE (s1, g2s##TYPE, s2, g4s##TYPE, \
26 s3, g6s##TYPE, s4, g8s##TYPE, \
27 s5, g10s##TYPE, s6, g12s##TYPE, \
28 s7, g14s##TYPE, s8, g16s##TYPE); \
34 DEBUG_FPUTS (#TYPE); \
35 DEBUG_FPUTS (" init: "); \
36 init##TYPE ( &g1s##TYPE, (double)1); \
37 init##TYPE ( &g2s##TYPE, (double)2); \
38 init##TYPE ( &g3s##TYPE, (double)3); \
39 init##TYPE ( &g4s##TYPE, (double)4); \
40 init##TYPE ( &g5s##TYPE, (double)5); \
41 init##TYPE ( &g6s##TYPE, (double)6); \
42 init##TYPE ( &g7s##TYPE, (double)7); \
43 init##TYPE ( &g8s##TYPE, (double)8); \
44 init##TYPE ( &g9s##TYPE, (double)9); \
45 init##TYPE (&g10s##TYPE, (double)10); \
46 init##TYPE (&g11s##TYPE, (double)11); \
47 init##TYPE (&g12s##TYPE, (double)12); \
48 init##TYPE (&g13s##TYPE, (double)13); \
49 init##TYPE (&g14s##TYPE, (double)14); \
50 init##TYPE (&g15s##TYPE, (double)15); \
51 init##TYPE (&g16s##TYPE, (double)16); \
54 DEBUG_FPUTS (#TYPE); \
55 DEBUG_FPUTS (" test: "); \
56 test##TYPE (g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE, \
57 g5s##TYPE, g6s##TYPE, g7s##TYPE, g8s##TYPE, \
58 g9s##TYPE, g10s##TYPE, g11s##TYPE, g12s##TYPE, \
59 g13s##TYPE, g14s##TYPE, g15s##TYPE, g16s##TYPE); \
61 DEBUG_FPUTS (#TYPE); \
62 DEBUG_FPUTS (" testva:"); \
68 g1s##TYPE, g2s##TYPE); \
71 g1s##TYPE, g2s##TYPE, g3s##TYPE); \
74 g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE); \
77 g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE, \
81 g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE, \
82 g5s##TYPE, g6s##TYPE); \
85 g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE, \
86 g5s##TYPE, g6s##TYPE, g7s##TYPE); \
89 g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE, \
90 g5s##TYPE, g6s##TYPE, g7s##TYPE, g8s##TYPE); \
93 g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE, \
94 g5s##TYPE, g6s##TYPE, g7s##TYPE, g8s##TYPE, \
98 g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE, \
99 g5s##TYPE, g6s##TYPE, g7s##TYPE, g8s##TYPE, \
100 g9s##TYPE, g10s##TYPE); \
103 g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE, \
104 g5s##TYPE, g6s##TYPE, g7s##TYPE, g8s##TYPE, \
105 g9s##TYPE, g10s##TYPE, g11s##TYPE); \
108 g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE, \
109 g5s##TYPE, g6s##TYPE, g7s##TYPE, g8s##TYPE, \
110 g9s##TYPE, g10s##TYPE, g11s##TYPE, g12s##TYPE); \
113 g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE, \
114 g5s##TYPE, g6s##TYPE, g7s##TYPE, g8s##TYPE, \
115 g9s##TYPE, g10s##TYPE, g11s##TYPE, g12s##TYPE, \
119 g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE, \
120 g5s##TYPE, g6s##TYPE, g7s##TYPE, g8s##TYPE, \
121 g9s##TYPE, g10s##TYPE, g11s##TYPE, g12s##TYPE, \
122 g13s##TYPE, g14s##TYPE); \
125 g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE, \
126 g5s##TYPE, g6s##TYPE, g7s##TYPE, g8s##TYPE, \
127 g9s##TYPE, g10s##TYPE, g11s##TYPE, g12s##TYPE, \
128 g13s##TYPE, g14s##TYPE, g15s##TYPE); \
131 g1s##TYPE, g2s##TYPE, g3s##TYPE, g4s##TYPE, \
132 g5s##TYPE, g6s##TYPE, g7s##TYPE, g8s##TYPE, \
133 g9s##TYPE, g10s##TYPE, g11s##TYPE, g12s##TYPE, \
134 g13s##TYPE, g14s##TYPE, g15s##TYPE, g16s##TYPE); \
136 DEBUG_FPUTS (#TYPE); \
137 DEBUG_FPUTS (" test2: "); \
138 test2_##TYPE (g1s##TYPE, g3s##TYPE, g5s##TYPE, g7s##TYPE, \
139 g9s##TYPE, g11s##TYPE, g13s##TYPE, g15s##TYPE); \
159 struct_by_value_10_x ()
163 #define T(TYPE) testit##TYPE ();