mirror of https://github.com/cc65/cc65.git
264 lines
6.0 KiB
C
264 lines
6.0 KiB
C
/*
|
|
!!DESCRIPTION!! structs
|
|
!!ORIGIN!! LCC 4.1 Testsuite
|
|
!!LICENCE!! own, freely distributeable for non-profit. read CPYRIGHT.LCC
|
|
*/
|
|
|
|
#include "common.h"
|
|
|
|
typedef struct point { int x,y; } point;
|
|
typedef struct rect { point pt1, pt2; } rect;
|
|
|
|
#define min(a, b) ((a) < (b) ? (a) : (b))
|
|
#define max(a, b) ((a) > (b) ? (a) : (b))
|
|
|
|
#ifdef NO_FUNCS_RETURN_STRUCTS
|
|
# ifdef NO_FUNCS_TAKE_STRUCTS
|
|
/* canonicalize rectangle coordinates */
|
|
void canonrect(rect *d,rect *r) {
|
|
d->pt1.x = min(r->pt1.x, r->pt2.x);
|
|
d->pt1.y = min(r->pt1.y, r->pt2.y);
|
|
d->pt2.x = max(r->pt1.x, r->pt2.x);
|
|
d->pt2.y = max(r->pt1.y, r->pt2.y);
|
|
}
|
|
/* add two points */
|
|
void addpoint(point *p, point *p1, point *p2) {
|
|
p->x= p1->x + p2->x;
|
|
p->y= p1->y + p2->y;
|
|
}
|
|
/* make a point from x and y components */
|
|
void makepoint(point *p,int x, int y) {
|
|
p->x = x;
|
|
p->y = y;
|
|
}
|
|
/* make a rectangle from two points */
|
|
void makerect(rect *d,point *p1, point *p2) {
|
|
rect r;
|
|
r.pt1.x = p1->x;
|
|
r.pt1.y = p1->y;
|
|
r.pt2.x = p2->x;
|
|
r.pt2.y = p2->y;
|
|
|
|
canonrect(d,&r);
|
|
}
|
|
|
|
#ifdef NO_SLOPPY_STRUCT_INIT
|
|
struct odd {char a[3]; } y = {{'a', 'b', 0 }};
|
|
#else
|
|
struct odd {char a[3]; } y = {'a', 'b', 0};
|
|
#endif
|
|
|
|
odd(struct odd *y) {
|
|
struct odd *x = y;
|
|
printf("%s\n\r", x->a);
|
|
}
|
|
|
|
# else /* FUNCS_TAKE_STRUCTS */
|
|
/* canonicalize rectangle coordinates */
|
|
void canonrect(rect *d,rect r) {
|
|
d->pt1.x = min(r.pt1.x, r.pt2.x);
|
|
d->pt1.y = min(r.pt1.y, r.pt2.y);
|
|
d->pt2.x = max(r.pt1.x, r.pt2.x);
|
|
d->pt2.y = max(r.pt1.y, r.pt2.y);
|
|
}
|
|
/* add two points */
|
|
void addpoint(point *p, point p1, point p2) {
|
|
p->x= p1.x + p2.x;
|
|
p->y= p1.y + p2.y;
|
|
}
|
|
/* make a point from x and y components */
|
|
void makepoint(point *p,int x, int y) {
|
|
p->x = x;
|
|
p->y = y;
|
|
}
|
|
/* make a rectangle from two points */
|
|
void makerect(rect *d,point p1, point p2) {
|
|
rect r;
|
|
r.pt1 = p1;
|
|
r.pt2 = p2;
|
|
|
|
canonrect(d,r);
|
|
}
|
|
|
|
#ifdef NO_SLOPPY_STRUCT_INIT
|
|
struct odd {char a[3]; } y = {{'a', 'b', 0}};
|
|
#else
|
|
struct odd {char a[3]; } y = {'a', 'b', 0};
|
|
#endif
|
|
|
|
odd(struct odd y) {
|
|
struct odd x = y;
|
|
printf("%s\n\r", x.a);
|
|
}
|
|
|
|
# endif /* FUNCS_TAKE_STRUCTS */
|
|
|
|
#else /* FUNCS_RETURN_STRUCTS */
|
|
|
|
/* add two points */
|
|
point addpoint(point p1, point p2) {
|
|
p1.x += p2.x;
|
|
p1.y += p2.y;
|
|
return p1;
|
|
}
|
|
/* canonicalize rectangle coordinates */
|
|
rect canonrect(rect r) {
|
|
rect temp;
|
|
|
|
temp.pt1.x = min(r.pt1.x, r.pt2.x);
|
|
temp.pt1.y = min(r.pt1.y, r.pt2.y);
|
|
temp.pt2.x = max(r.pt1.x, r.pt2.x);
|
|
temp.pt2.y = max(r.pt1.y, r.pt2.y);
|
|
return temp;
|
|
}
|
|
/* make a point from x and y components */
|
|
point makepoint(int x, int y) {
|
|
point p;
|
|
|
|
p.x = x;
|
|
p.y = y;
|
|
return p;
|
|
}
|
|
|
|
/* make a rectangle from two points */
|
|
rect makerect(point p1, point p2) {
|
|
rect r;
|
|
|
|
r.pt1 = p1;
|
|
r.pt2 = p2;
|
|
return canonrect(r);
|
|
}
|
|
|
|
struct odd {char a[3]; } y =
|
|
{
|
|
#ifdef NO_SLOPPY_STRUCT_INIT
|
|
{
|
|
#endif
|
|
'a', 'b', 0
|
|
#ifdef NO_SLOPPY_STRUCT_INIT
|
|
}
|
|
#endif
|
|
};
|
|
|
|
odd(struct odd y)
|
|
{
|
|
struct odd x
|
|
= y;
|
|
printf("%s\n\r", x.a);
|
|
}
|
|
|
|
#endif
|
|
|
|
/* is p in r? */
|
|
# ifdef NO_FUNCS_TAKE_STRUCTS
|
|
int ptinrect(point *p, rect *r) {
|
|
return p->x >= r->pt1.x && p->x < r->pt2.x
|
|
&& p->y >= r->pt1.y && p->y < r->pt2.y;
|
|
}
|
|
#else
|
|
int ptinrect(point p, rect r) {
|
|
return p.x >= r.pt1.x && p.x < r.pt2.x
|
|
&& p.y >= r.pt1.y && p.y < r.pt2.y;
|
|
}
|
|
#endif
|
|
|
|
#ifdef NO_FUNCS_RETURN_STRUCTS
|
|
|
|
#ifdef NO_LOCAL_STRUCT_INIT
|
|
#ifdef NO_SLOPPY_STRUCT_INIT
|
|
point pts[] = { {-1, -1},{ 1, 1},{ 20, 300},{ 500, 400 } };
|
|
#else
|
|
point pts[] = { -1, -1, 1, 1, 20, 300, 500, 400 };
|
|
#endif
|
|
point origin = { 0, 0 };
|
|
point maxpt = { 320, 320 };
|
|
#endif
|
|
|
|
main() {
|
|
int i;
|
|
point x;
|
|
rect screen;
|
|
#ifndef NO_LOCAL_STRUCT_INIT
|
|
point origin = { 0, 0 };
|
|
point maxpt = { 320, 320 };
|
|
#ifdef NO_SLOPPY_STRUCT_INIT
|
|
point pts[] = { {-1, -1},{ 1, 1},{ 20, 300},{ 500, 400 } };
|
|
#else
|
|
point pts[] = { -1, -1, 1, 1, 20, 300, 500, 400 };
|
|
#endif
|
|
#endif
|
|
|
|
makepoint ( &x, -10, -10);
|
|
#ifdef NO_FUNCS_TAKE_STRUCTS
|
|
addpoint ( &maxpt, &maxpt, &x);
|
|
#else
|
|
addpoint ( &maxpt, maxpt, x);
|
|
#endif
|
|
makepoint ( &x, 10, 10);
|
|
|
|
#ifdef NO_FUNCS_TAKE_STRUCTS
|
|
addpoint (&origin,&origin, &x);
|
|
makerect (&screen, &maxpt,&origin);
|
|
#else
|
|
addpoint (&origin,origin, x);
|
|
makerect (&screen, maxpt,origin);
|
|
#endif
|
|
|
|
for (i = 0; i < sizeof pts/sizeof pts[0]; i++) {
|
|
makepoint(&x,pts[i].x, pts[i].y);
|
|
printf("(%d,%d) is ", pts[i].x, x.y);
|
|
#ifdef NO_FUNCS_TAKE_STRUCTS
|
|
if (ptinrect(&x, &screen) == 0)
|
|
#else
|
|
if (ptinrect(x, screen) == 0)
|
|
#endif
|
|
{
|
|
printf("not ");
|
|
}
|
|
printf("within (%d,%d; %d,%d)\n\r", screen.pt1.x, screen.pt1.y,
|
|
screen.pt2.x, screen.pt2.y);
|
|
}
|
|
#ifdef NO_FUNCS_TAKE_STRUCTS
|
|
odd(&y);
|
|
#else
|
|
odd(y);
|
|
#endif
|
|
|
|
return 0;
|
|
}
|
|
|
|
#else /* FUNCS_RETURN_STRUCTS */
|
|
|
|
main() {
|
|
int i;
|
|
point x, origin = { 0, 0 }, maxpt = { 320, 320 };
|
|
|
|
#ifdef NO_SLOPPY_STRUCT_INIT
|
|
point pts[] = { {-1, -1}, {1, 1}, {20, 300}, {500, 400} };
|
|
#else
|
|
point pts[] = { -1, -1, 1, 1, 20, 300, 500, 400 };
|
|
#endif
|
|
|
|
rect screen =
|
|
makerect(
|
|
addpoint(maxpt, makepoint(-10, -10)),
|
|
addpoint(origin, makepoint(10, 10))
|
|
);
|
|
|
|
test1();
|
|
|
|
for (i = 0; i < sizeof pts/sizeof pts[0]; i++) {
|
|
printf("(%d,%d) is ", pts[i].x,
|
|
(x = makepoint(pts[i].x, pts[i].y)).y);
|
|
if (ptinrect(x, screen) == 0)
|
|
printf("not ");
|
|
printf("within (%d,%d; %d,%d)\n\r", screen.pt1.x, screen.pt1.y,
|
|
screen.pt2.x, screen.pt2.y);
|
|
}
|
|
odd(y);
|
|
|
|
return 0;
|
|
}
|
|
|
|
#endif /* FUNCS_RETURN_STRUCTS */
|