53 |
|
char *khalffn = "klems_half.cal"; |
54 |
|
char *kquarterfn = "klems_quarter.cal"; |
55 |
|
|
56 |
< |
#define PARAMSTART "@rfluxmtx" /* string indicating parameters */ |
56 |
> |
/* string indicating parameters */ |
57 |
> |
const char PARAMSTART[] = "@rfluxmtx"; |
58 |
|
|
59 |
|
/* surface type IDs */ |
60 |
|
#define ST_NONE 0 |
1123 |
|
continue; |
1124 |
|
} |
1125 |
|
if (c == '#') { /* parameters/comment */ |
1126 |
< |
if (fscanf(fp, "%s", inpbuf) == 1 && |
1126 |
> |
if ((c = getc(fp)) == EOF || ungetc(c,fp) == EOF) |
1127 |
> |
break; |
1128 |
> |
if (!isspace(c) && fscanf(fp, "%s", inpbuf) == 1 && |
1129 |
|
!strcmp(inpbuf, PARAMSTART)) { |
1130 |
|
if (fgets(inpbuf, sizeof(inpbuf), fp) != NULL) |
1131 |
|
parse_params(inpbuf); |
1320 |
|
userr: |
1321 |
|
if (a < argc-2) |
1322 |
|
fprintf(stderr, "%s: unsupported option '%s'", progname, argv[a]); |
1323 |
< |
fprintf(stderr, "Usage: %s [rcontrib options] sender.rad receiver.rad [system.rad ..]\n", |
1323 |
> |
fprintf(stderr, "Usage: %s [-v][rcontrib options] sender.rad receiver.rad [system.rad ..]\n", |
1324 |
|
progname); |
1325 |
|
return(1); |
1326 |
|
} |