| 19 |
|
*/ |
| 20 |
|
|
| 21 |
|
|
| 22 |
< |
extern int |
| 22 |
> |
int |
| 23 |
|
m_clip( /* clip objects from ray */ |
| 24 |
< |
register OBJREC *m, |
| 25 |
< |
register RAY *r |
| 24 |
> |
OBJREC *m, |
| 25 |
> |
RAY *r |
| 26 |
|
) |
| 27 |
|
{ |
| 28 |
|
OBJECT cset[MAXSET+1], *modset; |
| 29 |
|
OBJECT obj, mod; |
| 30 |
|
int entering; |
| 31 |
< |
register int i; |
| 31 |
> |
int i; |
| 32 |
|
|
| 33 |
|
obj = objndx(m); |
| 34 |
|
if ((modset = (OBJECT *)m->os) == NULL) { |
| 62 |
|
else |
| 63 |
|
cset[0] = 0; |
| 64 |
|
|
| 65 |
< |
entering = r->rod > 0.0; /* entering clipped region? */ |
| 65 |
> |
entering = (r->rod > 0.0); /* entering clipped region? */ |
| 66 |
|
|
| 67 |
< |
for (i = modset[0]; i > 0; i--) { |
| 67 |
> |
for (i = modset[0]; i > 0; i--) |
| 68 |
|
if (entering) { |
| 69 |
|
if (!inset(cset, modset[i])) { |
| 70 |
|
if (cset[0] >= MAXSET) |
| 71 |
|
error(INTERNAL, "set overflow in m_clip"); |
| 72 |
|
insertelem(cset, modset[i]); |
| 73 |
|
} |
| 74 |
< |
} else { |
| 75 |
< |
if (inset(cset, modset[i])) |
| 76 |
< |
deletelem(cset, modset[i]); |
| 77 |
< |
} |
| 78 |
< |
} |
| 74 |
> |
} else if (inset(cset, modset[i])) |
| 75 |
> |
deletelem(cset, modset[i]); |
| 76 |
> |
|
| 77 |
|
/* compute ray value */ |
| 78 |
|
r->newcset = cset; |
| 79 |
|
if (strcmp(m->oargs.sarg[0], VOIDID)) { |
| 80 |
|
int inside = 0; |
| 81 |
< |
register const RAY *rp; |
| 81 |
> |
const RAY *rp; |
| 82 |
|
/* check for penetration */ |
| 83 |
|
for (rp = r; rp->parent != NULL; rp = rp->parent) |
| 84 |
|
if (!(rp->rtype & RAYREFL) && rp->parent->ro != NULL |
