179 |
|
eputs(s) /* put string to stderr */ |
180 |
|
register char *s; |
181 |
|
{ |
182 |
< |
static int inline = 0; |
182 |
> |
static int inln = 0; |
183 |
|
|
184 |
< |
if (!inline++) { |
184 |
> |
if (!inln++) { |
185 |
|
fputs(progname, stderr); |
186 |
|
fputs(": ", stderr); |
187 |
|
} |
188 |
|
fputs(s, stderr); |
189 |
|
if (*s && s[strlen(s)-1] == '\n') |
190 |
< |
inline = 0; |
190 |
> |
inln = 0; |
191 |
|
} |
192 |
|
|
193 |
|
|
195 |
|
register CUBE *cu; |
196 |
|
OBJECT obj; |
197 |
|
{ |
198 |
+ |
#define nexti(n) ((ndx += cnt*cnt++)%(n)) |
199 |
+ |
static unsigned long ndx; |
200 |
+ |
static unsigned int cnt; |
201 |
|
CUBE cukid; |
202 |
|
OCTREE ot; |
203 |
|
OBJECT oset[MAXSET+1]; |
204 |
< |
int in; |
204 |
> |
int in, k; |
205 |
|
register int i, j; |
206 |
|
|
207 |
|
in = (*ofun[objptr(obj)->otype].funp)(objptr(obj), cu); |
255 |
|
if ((1<<j) & i) |
256 |
|
cukid.cuorg[j] += cukid.cusize; |
257 |
|
} |
258 |
< |
addobject(&cukid, obj); |
258 |
> |
/* surfaces first */ |
259 |
|
for (j = 1; j <= oset[0]; j++) |
260 |
< |
addobject(&cukid, oset[j]); |
260 |
> |
if (!isvolume(objptr(oset[j])->otype)) |
261 |
> |
addobject(&cukid, oset[j]); |
262 |
> |
/* then this object */ |
263 |
> |
addobject(&cukid, obj); |
264 |
> |
/* volumes last */ |
265 |
> |
k = nexti(oset[0]); /* random start */ |
266 |
> |
for (j = k+1; j <= oset[0]; j++) |
267 |
> |
if (isvolume(objptr(oset[j])->otype)) |
268 |
> |
addobject(&cukid, oset[j]); |
269 |
> |
for (j = 1; j <= k; j++) |
270 |
> |
if (isvolume(objptr(oset[j])->otype)) |
271 |
> |
addobject(&cukid, oset[j]); |
272 |
|
octkid(ot, i) = cukid.cutree; |
273 |
|
} |
274 |
|
cu->cutree = ot; |
275 |
|
} |
276 |
|
} |
277 |
+ |
#undef nexti |
278 |
|
} |