| 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 |
|
|
| 252 |
|
if ((1<<j) & i) |
| 253 |
|
cukid.cuorg[j] += cukid.cusize; |
| 254 |
|
} |
| 255 |
+ |
/* surfaces first */ |
| 256 |
+ |
for (j = 1; j <= oset[0]; j++) |
| 257 |
+ |
if (!isvolume(objptr(oset[j])->otype)) |
| 258 |
+ |
addobject(&cukid, oset[j]); |
| 259 |
+ |
/* then this object */ |
| 260 |
|
addobject(&cukid, obj); |
| 261 |
+ |
/* volumes last */ |
| 262 |
|
for (j = 1; j <= oset[0]; j++) |
| 263 |
< |
addobject(&cukid, oset[j]); |
| 263 |
> |
if (isvolume(objptr(oset[j])->otype)) |
| 264 |
> |
addobject(&cukid, oset[j]); |
| 265 |
|
octkid(ot, i) = cukid.cutree; |
| 266 |
|
} |
| 267 |
|
cu->cutree = ot; |
