23 |
|
|
24 |
|
int report_intvl = 0; /* reporting interval (seconds) */ |
25 |
|
|
26 |
– |
extern char * progname; // global argv[0] |
27 |
– |
|
26 |
|
RcontribSimulManager myRCmanager; // global rcontrib simulation manager |
27 |
|
|
28 |
|
#define RCONTRIB_FEATURES "Multiprocessing\n" \ |
240 |
|
if (rval) erract[WARNING].pf = wputs; |
241 |
|
else erract[WARNING].pf = NULL; |
242 |
|
break; |
245 |
– |
case 'e': /* .cal expression */ |
246 |
– |
check(2,"s"); |
247 |
– |
scompile(argv[++i], NULL, 0); |
248 |
– |
break; |
243 |
|
case 'l': /* limit distance */ |
244 |
|
if (argv[i][2] != 'd') |
245 |
|
goto badopt; |
252 |
|
check_bool(2,rval); |
253 |
|
myRCmanager.SetFlag(RTimmIrrad, rval); |
254 |
|
break; |
255 |
< |
case 'f': /* .cal file or force or format */ |
262 |
< |
if (!argv[i][2]) { |
263 |
< |
check(2,"s"); |
264 |
< |
loadfunc(argv[++i]); |
265 |
< |
break; |
266 |
< |
} |
255 |
> |
case 'f': /* force or format */ |
256 |
|
if (argv[i][2] == 'o') { |
257 |
|
check_bool(3,force_open); |
258 |
|
break; |
333 |
|
myRCmanager.LoadOctree(argv[argc-1]); |
334 |
|
// add to header |
335 |
|
myRCmanager.AddHeader(argc-1, argv); |
336 |
+ |
{ |
337 |
+ |
char buf[128] = "SOFTWARE= "; |
338 |
+ |
strcpy(buf+10, VersionID); |
339 |
+ |
myRCmanager.AddHeader(buf); |
340 |
+ |
} |
341 |
|
// prepare output files |
342 |
|
if (recover) |
343 |
|
myRCmanager.outOp = RCOrecover; |
561 |
|
int code |
562 |
|
) |
563 |
|
{ |
564 |
< |
if (!code && myRCmanager.Ready()) // clean up on normal exit |
571 |
< |
code = myRCmanager.Cleanup(); |
564 |
> |
myRCmanager.FlushQueue(); // leave nothing in queue |
565 |
|
|
566 |
|
exit(code); |
567 |
|
} |