53 |
|
|
54 |
|
char RCCONTEXT[] = "RC."; /* our special evaluation context */ |
55 |
|
|
56 |
+ |
#if defined(_WIN32) || defined(_WIN64) |
57 |
+ |
#define RCONTRIB_FEATURES "Accumulation\nSummation\nRecovery\n" \ |
58 |
+ |
"ValueContribution\nImmediateIrradiance\n" \ |
59 |
+ |
"ProgressReporting\nDistanceLimiting\n" \ |
60 |
+ |
"Outputs=V,W\n" |
61 |
+ |
#else |
62 |
+ |
#define RCONTRIB_FEATURES "Multiprocessing\n" \ |
63 |
+ |
"Accumulation\nSummation\nRecovery\n" \ |
64 |
+ |
"ValueContribution\nImmediateIrradiance\n" \ |
65 |
+ |
"ProgressReporting\nDistanceLimiting\n" \ |
66 |
+ |
"Outputs=V,W\n" |
67 |
+ |
#endif |
68 |
|
|
69 |
|
static void |
70 |
|
printdefaults(void) /* print default values to stdout */ |
195 |
|
progname = argv[0] = fixargv0(argv[0]); |
196 |
|
gargv = argv; |
197 |
|
gargc = argc; |
198 |
+ |
/* feature check only? */ |
199 |
+ |
strcat(RFeatureList, RCONTRIB_FEATURES); |
200 |
+ |
if (argc == 2 && !strcmp(argv[1], "-features")) |
201 |
+ |
return feature_status(argc-2, argv+2); |
202 |
|
#if defined(_WIN32) || defined(_WIN64) |
203 |
|
_setmaxstdio(2048); /* increase file limit to maximum */ |
204 |
|
#endif |
205 |
|
/* initialize calcomp routines early */ |
206 |
|
initfunc(); |
207 |
< |
setcontext(RCCONTEXT); |
207 |
> |
calcontext(RCCONTEXT); |
208 |
|
/* option city */ |
209 |
|
for (i = 1; i < argc; i++) { |
210 |
|
/* expand arguments */ |