1 /*
2 !!DESCRIPTION!! structs
3 !!ORIGIN!! LCC 4.1 Testsuite
4 !!LICENCE!! own, freely distributeable for non-profit. read CPYRIGHT.LCC
5 */
6
7 #include "common.h"
8
9 typedef struct point { int x,y; } point;
10 typedef struct rect { point pt1, pt2; } rect;
11
12 #define min(a, b) ((a) < (b) ? (a) : (b))
13 #define max(a, b) ((a) > (b) ? (a) : (b))
14
15 #ifdef NO_FUNCS_RETURN_STRUCTS
16 # ifdef NO_FUNCS_TAKE_STRUCTS
17 /* canonicalize rectangle coordinates */
canonrect(rect * d,rect * r)18 void canonrect(rect *d,rect *r) {
19 d->pt1.x = min(r->pt1.x, r->pt2.x);
20 d->pt1.y = min(r->pt1.y, r->pt2.y);
21 d->pt2.x = max(r->pt1.x, r->pt2.x);
22 d->pt2.y = max(r->pt1.y, r->pt2.y);
23 }
24 /* add two points */
addpoint(point * p,point * p1,point * p2)25 void addpoint(point *p, point *p1, point *p2) {
26 p->x= p1->x + p2->x;
27 p->y= p1->y + p2->y;
28 }
29 /* make a point from x and y components */
makepoint(point * p,int x,int y)30 void makepoint(point *p,int x, int y) {
31 p->x = x;
32 p->y = y;
33 }
34 /* make a rectangle from two points */
makerect(rect * d,point * p1,point * p2)35 void makerect(rect *d,point *p1, point *p2) {
36 rect r;
37 r.pt1.x = p1->x;
38 r.pt1.y = p1->y;
39 r.pt2.x = p2->x;
40 r.pt2.y = p2->y;
41
42 canonrect(d,&r);
43 }
44
45 #ifdef NO_SLOPPY_STRUCT_INIT
46 struct odd {char a[3]; } y = {{'a', 'b', 0 }};
47 #else
48 struct odd {char a[3]; } y = {'a', 'b', 0};
49 #endif
50
odd(struct odd * y)51 odd(struct odd *y) {
52 struct odd *x = y;
53 printf("%s\n\r", x->a);
54 }
55
56 # else /* FUNCS_TAKE_STRUCTS */
57 /* canonicalize rectangle coordinates */
canonrect(rect * d,rect r)58 void canonrect(rect *d,rect r) {
59 d->pt1.x = min(r.pt1.x, r.pt2.x);
60 d->pt1.y = min(r.pt1.y, r.pt2.y);
61 d->pt2.x = max(r.pt1.x, r.pt2.x);
62 d->pt2.y = max(r.pt1.y, r.pt2.y);
63 }
64 /* add two points */
addpoint(point * p,point p1,point p2)65 void addpoint(point *p, point p1, point p2) {
66 p->x= p1.x + p2.x;
67 p->y= p1.y + p2.y;
68 }
69 /* make a point from x and y components */
makepoint(point * p,int x,int y)70 void makepoint(point *p,int x, int y) {
71 p->x = x;
72 p->y = y;
73 }
74 /* make a rectangle from two points */
makerect(rect * d,point p1,point p2)75 void makerect(rect *d,point p1, point p2) {
76 rect r;
77 r.pt1 = p1;
78 r.pt2 = p2;
79
80 canonrect(d,r);
81 }
82
83 #ifdef NO_SLOPPY_STRUCT_INIT
84 struct odd {char a[3]; } y = {{'a', 'b', 0}};
85 #else
86 struct odd {char a[3]; } y = {'a', 'b', 0};
87 #endif
88
odd(struct odd y)89 odd(struct odd y) {
90 struct odd x = y;
91 printf("%s\n\r", x.a);
92 }
93
94 # endif /* FUNCS_TAKE_STRUCTS */
95
96 #else /* FUNCS_RETURN_STRUCTS */
97
98 /* add two points */
addpoint(point p1,point p2)99 point addpoint(point p1, point p2) {
100 p1.x += p2.x;
101 p1.y += p2.y;
102 return p1;
103 }
104 /* canonicalize rectangle coordinates */
canonrect(rect r)105 rect canonrect(rect r) {
106 rect temp;
107
108 temp.pt1.x = min(r.pt1.x, r.pt2.x);
109 temp.pt1.y = min(r.pt1.y, r.pt2.y);
110 temp.pt2.x = max(r.pt1.x, r.pt2.x);
111 temp.pt2.y = max(r.pt1.y, r.pt2.y);
112 return temp;
113 }
114 /* make a point from x and y components */
makepoint(int x,int y)115 point makepoint(int x, int y) {
116 point p;
117
118 p.x = x;
119 p.y = y;
120 return p;
121 }
122
123 /* make a rectangle from two points */
makerect(point p1,point p2)124 rect makerect(point p1, point p2) {
125 rect r;
126
127 r.pt1 = p1;
128 r.pt2 = p2;
129 return canonrect(r);
130 }
131
132 struct odd {char a[3]; } y =
133 {
134 #ifdef NO_SLOPPY_STRUCT_INIT
135 {
136 #endif
137 'a', 'b', 0
138 #ifdef NO_SLOPPY_STRUCT_INIT
139 }
140 #endif
141 };
142
odd(struct odd y)143 odd(struct odd y)
144 {
145 struct odd x
146 = y;
147 printf("%s\n\r", x.a);
148 }
149
150 #endif
151
152 /* is p in r? */
153 # ifdef NO_FUNCS_TAKE_STRUCTS
ptinrect(point * p,rect * r)154 int ptinrect(point *p, rect *r) {
155 return p->x >= r->pt1.x && p->x < r->pt2.x
156 && p->y >= r->pt1.y && p->y < r->pt2.y;
157 }
158 #else
ptinrect(point p,rect r)159 int ptinrect(point p, rect r) {
160 return p.x >= r.pt1.x && p.x < r.pt2.x
161 && p.y >= r.pt1.y && p.y < r.pt2.y;
162 }
163 #endif
164
165 #ifdef NO_FUNCS_RETURN_STRUCTS
166
167 #ifdef NO_LOCAL_STRUCT_INIT
168 #ifdef NO_SLOPPY_STRUCT_INIT
169 point pts[] = { {-1, -1},{ 1, 1},{ 20, 300},{ 500, 400 } };
170 #else
171 point pts[] = { -1, -1, 1, 1, 20, 300, 500, 400 };
172 #endif
173 point origin = { 0, 0 };
174 point maxpt = { 320, 320 };
175 #endif
176
main()177 main() {
178 int i;
179 point x;
180 rect screen;
181 #ifndef NO_LOCAL_STRUCT_INIT
182 point origin = { 0, 0 };
183 point maxpt = { 320, 320 };
184 #ifdef NO_SLOPPY_STRUCT_INIT
185 point pts[] = { {-1, -1},{ 1, 1},{ 20, 300},{ 500, 400 } };
186 #else
187 point pts[] = { -1, -1, 1, 1, 20, 300, 500, 400 };
188 #endif
189 #endif
190
191 makepoint ( &x, -10, -10);
192 #ifdef NO_FUNCS_TAKE_STRUCTS
193 addpoint ( &maxpt, &maxpt, &x);
194 #else
195 addpoint ( &maxpt, maxpt, x);
196 #endif
197 makepoint ( &x, 10, 10);
198
199 #ifdef NO_FUNCS_TAKE_STRUCTS
200 addpoint (&origin,&origin, &x);
201 makerect (&screen, &maxpt,&origin);
202 #else
203 addpoint (&origin,origin, x);
204 makerect (&screen, maxpt,origin);
205 #endif
206
207 for (i = 0; i < sizeof pts/sizeof pts[0]; i++) {
208 makepoint(&x,pts[i].x, pts[i].y);
209 printf("(%d,%d) is ", pts[i].x, x.y);
210 #ifdef NO_FUNCS_TAKE_STRUCTS
211 if (ptinrect(&x, &screen) == 0)
212 #else
213 if (ptinrect(x, screen) == 0)
214 #endif
215 {
216 printf("not ");
217 }
218 printf("within (%d,%d; %d,%d)\n\r", screen.pt1.x, screen.pt1.y,
219 screen.pt2.x, screen.pt2.y);
220 }
221 #ifdef NO_FUNCS_TAKE_STRUCTS
222 odd(&y);
223 #else
224 odd(y);
225 #endif
226
227 return 0;
228 }
229
230 #else /* FUNCS_RETURN_STRUCTS */
231
main()232 main() {
233 int i;
234 point x, origin = { 0, 0 }, maxpt = { 320, 320 };
235
236 #ifdef NO_SLOPPY_STRUCT_INIT
237 point pts[] = { {-1, -1}, {1, 1}, {20, 300}, {500, 400} };
238 #else
239 point pts[] = { -1, -1, 1, 1, 20, 300, 500, 400 };
240 #endif
241
242 rect screen =
243 makerect(
244 addpoint(maxpt, makepoint(-10, -10)),
245 addpoint(origin, makepoint(10, 10))
246 );
247
248 test1();
249
250 for (i = 0; i < sizeof pts/sizeof pts[0]; i++) {
251 printf("(%d,%d) is ", pts[i].x,
252 (x = makepoint(pts[i].x, pts[i].y)).y);
253 if (ptinrect(x, screen) == 0)
254 printf("not ");
255 printf("within (%d,%d; %d,%d)\n\r", screen.pt1.x, screen.pt1.y,
256 screen.pt2.x, screen.pt2.y);
257 }
258 odd(y);
259
260 return 0;
261 }
262
263 #endif /* FUNCS_RETURN_STRUCTS */
264