| 88 |
|
default: |
| 89 |
|
goto userr; |
| 90 |
|
} |
| 91 |
– |
/* do we have a job? */ |
| 92 |
– |
if (outdev == NULL && ncprocs <= 0) |
| 93 |
– |
goto userr; |
| 91 |
|
/* get root file name */ |
| 92 |
|
rootname(froot, hdkfile=argv[i++]); |
| 93 |
|
/* load... */ |
| 130 |
|
quit(0); |
| 131 |
|
userr: |
| 132 |
|
fprintf(stderr, |
| 133 |
< |
"Usage: %s {-n nprocs|-o disp} [-w][-f] output.hdk [control.hif [VAR=val ..]]\n", |
| 133 |
> |
"Usage: %s [-n nprocs][-o disp][-w][-f] output.hdk [control.hif [VAR=val ..]]\n", |
| 134 |
|
progname); |
| 135 |
|
quit(1); |
| 136 |
|
} |
| 230 |
|
goto memerr; |
| 231 |
|
freepacks[--i].nr = 0; |
| 232 |
|
freepacks[i].next = NULL; |
| 233 |
< |
if (!vbool(OBSTRUCTIONS)) { |
| 233 |
> |
if (!vdef(OBSTRUCTIONS) || !vbool(OBSTRUCTIONS)) { |
| 234 |
|
freepacks[i].offset = (float *)bmalloc( |
| 235 |
|
RPACKSIZ*sizeof(float)*(i+1) ); |
| 236 |
|
if (freepacks[i].offset == NULL) |
| 334 |
|
sprintf(vval(OCTREE), "%s.oct", froot); |
| 335 |
|
vdef(OCTREE)++; |
| 336 |
|
} |
| 340 |
– |
if (!vdef(OBSTRUCTIONS)) { |
| 341 |
– |
vval(OBSTRUCTIONS) = "T"; |
| 342 |
– |
vdef(OBSTRUCTIONS)++; |
| 343 |
– |
} |
| 337 |
|
if (!vdef(VDIST)) { |
| 338 |
|
vval(VDIST) = "F"; |
| 339 |
|
vdef(VDIST)++; |
| 541 |
|
{ |
| 542 |
|
int status = 0; |
| 543 |
|
|
| 544 |
< |
if (hdlist[0] != NULL) { /* flush holodeck */ |
| 544 |
> |
if (hdlist[0] != NULL) { /* close holodeck */ |
| 545 |
|
if (nprocs > 0) |
| 546 |
< |
status = done_rtrace(); |
| 554 |
< |
hdflush(NULL); |
| 546 |
> |
status = done_rtrace(); /* calls hdsync() */ |
| 547 |
|
if (ncprocs > 0 && vdef(REPORT)) { |
| 548 |
|
long fsiz, fuse; |
| 549 |
|
fsiz = hdfilen(hdlist[0]->fd); |