Browse Source

Slightly improve error handling and warning message

pre-master-46
Holger Vogt 3 years ago
parent
commit
d295fe3ac6
  1. 7
      src/frontend/inp.c

7
src/frontend/inp.c

@ -900,17 +900,18 @@ inp_spsource(FILE *fp, bool comfile, char *filename, bool intfile)
dd->line[0] = '*';
s = skip_ws(dd->line + 8);
while (s && *s) {
char* nexttoken = s;
cstoken[0] = gettok_char(&s, '=', FALSE, FALSE);
cstoken[1] = gettok_char(&s, '=', TRUE, FALSE);
cstoken[2] = gettok(&s);
/* guard against buggy input line */
if (!cstoken[0] || !cstoken[1] || !cstoken[2] || strchr(cstoken[2],'=')) {
fprintf(stderr, "Warning: bad csparam definition, %s skipped!\n", nexttoken);
fprintf(stderr, " See line %d, .%s\n\n", dd->linenum, dd->line + 1);
tfree(cstoken[0]);
tfree(cstoken[1]);
tfree(cstoken[2]);
fprintf(stderr, "Warning: bad csparam definition, skipped!\n");
fprintf(stderr, " in line %d, .%s\n\n", dd->linenum, dd->line + 1);
continue;
break;
}
for (i = 3; --i >= 0; ) {
wlist = wl_cons(cstoken[i], wlist);

Loading…
Cancel
Save