1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
|
/* All test functions return the sum of arguments, plus 1.
Void-returning functions put the result in the_result.
Complex-returning functions return their signature number as the
(constant) imaginary part of the result. */
double the_result;
void v0 (void) { the_result = 1.0; }
void v1 (float x) { the_result = 1.0 + x; }
void v5 (float x, float y) { the_result = 1.0 + x + y; }
void v9 (float x, double y) { the_result = 1.0 + x + y; }
void v2 (double x) { the_result = 1.0 + x; }
void v6 (double x, float y) { the_result = 1.0 + x + y; }
void v10 (double x, double y) { the_result = 1.0 + x + y; }
float f0 (void) { return 1.0; }
float f1 (float x) { return 1.0 + x; }
float f5 (float x, float y) { return 1.0 + x + y; }
float f9 (float x, double y) { return 1.0 + x + y; }
float f2 (double x) { return 1.0 + x; }
float f6 (double x, float y) { return 1.0 + x + y; }
float f10 (double x, double y) { return 1.0 + x + y; }
double d0 (void) { return 1.0; }
double d1 (float x) { return 1.0 + x; }
double d5 (float x, float y) { return 1.0 + x + y; }
double d9 (float x, double y) { return 1.0 + x + y; }
double d2 (double x) { return 1.0 + x; }
double d6 (double x, float y) { return 1.0 + x + y; }
double d10 (double x, double y) { return 1.0 + x + y; }
_Complex float cf0 (void) { return 1.0 + 0.0i; }
_Complex float cf1 (float x) { return 1.0 + x + 1.0i; }
_Complex float cf5 (float x, float y) { return 1.0 + x + y + 5.0i; }
_Complex float cf9 (float x, double y) { return 1.0 + x + y + 9.0i; }
_Complex float cf2 (double x) { return 1.0 + x + 2.0i; }
_Complex float cf6 (double x, float y) { return 1.0 + x + y + 6.0i; }
_Complex float cf10 (double x, double y) { return 1.0 + x + y + 10.0i; }
_Complex double cd0 (void) { return 1.0 + 0.0i; }
_Complex double cd1 (float x) { return 1.0 + x + 1.0i; }
_Complex double cd5 (float x, float y) { return 1.0 + x + y + 5.0i; }
_Complex double cd9 (float x, double y) { return 1.0 + x + y + 9.0i; }
_Complex double cd2 (double x) { return 1.0 + x + 2.0i; }
_Complex double cd6 (double x, float y) { return 1.0 + x + y + 6.0i; }
_Complex double cd10 (double x, double y) { return 1.0 + x + y + 10.0i; }
/* Declare and initialize all the pointer-to-function variables. */
void (*pv0) (void);
void (*pv1) (float);
void (*pv5) (float, float);
void (*pv9) (float, double);
void (*pv2) (double);
void (*pv6) (double, float);
void (*pv10) (double, double);
float (*pf0) (void);
float (*pf1) (float);
float (*pf5) (float, float);
float (*pf9) (float, double);
float (*pf2) (double);
float (*pf6) (double, float);
float (*pf10) (double, double);
double (*pd0) (void);
double (*pd1) (float);
double (*pd5) (float, float);
double (*pd9) (float, double);
double (*pd2) (double);
double (*pd6) (double, float);
double (*pd10) (double, double);
_Complex float (*pcf0) (void);
_Complex float (*pcf1) (float);
_Complex float (*pcf5) (float, float);
_Complex float (*pcf9) (float, double);
_Complex float (*pcf2) (double);
_Complex float (*pcf6) (double, float);
_Complex float (*pcf10) (double, double);
_Complex double (*pcd0) (void);
_Complex double (*pcd1) (float);
_Complex double (*pcd5) (float, float);
_Complex double (*pcd9) (float, double);
_Complex double (*pcd2) (double);
_Complex double (*pcd6) (double, float);
_Complex double (*pcd10) (double, double);
void
init (void)
{
pv0 = v0;
pv1 = v1;
pv5 = v5;
pv9 = v9;
pv2 = v2;
pv6 = v6;
pv10 = v10;
pf0 = f0;
pf1 = f1;
pf5 = f5;
pf9 = f9;
pf2 = f2;
pf6 = f6;
pf10 = f10;
pd0 = d0;
pd1 = d1;
pd5 = d5;
pd9 = d9;
pd2 = d2;
pd6 = d6;
pd10 = d10;
pcf0 = cf0;
pcf1 = cf1;
pcf5 = cf5;
pcf9 = cf9;
pcf2 = cf2;
pcf6 = cf6;
pcf10 = cf10;
pcd0 = cd0;
pcd1 = cd1;
pcd5 = cd5;
pcd9 = cd9;
pcd2 = cd2;
pcd6 = cd6;
pcd10 = cd10;
}
|
