|
|
|
@ -4212,7 +4212,7 @@ inp_compat(struct line *card) |
|
|
|
// get the expression |
|
|
|
str_ptr = gettok(&cut_line); /* ignore 'table' */ |
|
|
|
if (!cieq(str_ptr, "table")) { |
|
|
|
fprintf(stderr, "Error: bad sytax in line %d\n %s\n", |
|
|
|
fprintf(stderr, "Error: bad syntax in line %d\n %s\n", |
|
|
|
card->li_linenum_orig, card->li_line); |
|
|
|
controlled_exit(EXIT_BAD); |
|
|
|
} |
|
|
|
@ -4220,7 +4220,7 @@ inp_compat(struct line *card) |
|
|
|
str_ptr = gettok_char(&cut_line, '{', FALSE, FALSE); |
|
|
|
expression = gettok_char(&cut_line, '}', TRUE, TRUE); /* expression */ |
|
|
|
if (!expression || !str_ptr) { |
|
|
|
fprintf(stderr, "Error: bad sytax in line %d\n %s\n", |
|
|
|
fprintf(stderr, "Error: bad syntax in line %d\n %s\n", |
|
|
|
card->li_linenum_orig, card->li_line); |
|
|
|
controlled_exit(EXIT_BAD); |
|
|
|
} |
|
|
|
@ -4242,7 +4242,7 @@ inp_compat(struct line *card) |
|
|
|
str_ptr = cut_line; |
|
|
|
ffirstno = gettok_node(&cut_line); |
|
|
|
if (!ffirstno) { |
|
|
|
fprintf(stderr, "Error: bad sytax in line %d\n %s\n", |
|
|
|
fprintf(stderr, "Error: bad syntax in line %d\n %s\n", |
|
|
|
card->li_linenum_orig, card->li_line); |
|
|
|
controlled_exit(EXIT_BAD); |
|
|
|
} |
|
|
|
@ -4264,7 +4264,7 @@ inp_compat(struct line *card) |
|
|
|
delta = (lnumber-fnumber)/2.; |
|
|
|
lastlastno = gettok_node(&cut_line); |
|
|
|
if (!secondno || (*midline == 0) || (delta <= 0.) || !lastlastno) { |
|
|
|
fprintf(stderr, "Error: bad sytax in line %d\n %s\n", |
|
|
|
fprintf(stderr, "Error: bad syntax in line %d\n %s\n", |
|
|
|
card->li_linenum_orig, card->li_line); |
|
|
|
controlled_exit(EXIT_BAD); |
|
|
|
} |
|
|
|
@ -4404,7 +4404,7 @@ inp_compat(struct line *card) |
|
|
|
// get the expression |
|
|
|
str_ptr = gettok(&cut_line); /* ignore 'table' */ |
|
|
|
if (!cieq(str_ptr, "table")) { |
|
|
|
fprintf(stderr, "Error: bad sytax in line %d\n %s\n", |
|
|
|
fprintf(stderr, "Error: bad syntax in line %d\n %s\n", |
|
|
|
card->li_linenum_orig, card->li_line); |
|
|
|
controlled_exit(EXIT_BAD); |
|
|
|
} |
|
|
|
@ -4412,7 +4412,7 @@ inp_compat(struct line *card) |
|
|
|
str_ptr = gettok_char(&cut_line, '{', FALSE, FALSE); |
|
|
|
expression = gettok_char(&cut_line, '}', TRUE, TRUE); /* expression */ |
|
|
|
if (!expression || !str_ptr) { |
|
|
|
fprintf(stderr, "Error: bad sytax in line %d\n %s\n", |
|
|
|
fprintf(stderr, "Error: bad syntax in line %d\n %s\n", |
|
|
|
card->li_linenum_orig, card->li_line); |
|
|
|
controlled_exit(EXIT_BAD); |
|
|
|
} |
|
|
|
@ -4434,7 +4434,7 @@ inp_compat(struct line *card) |
|
|
|
str_ptr = cut_line; |
|
|
|
ffirstno = gettok_node(&cut_line); |
|
|
|
if (!ffirstno) { |
|
|
|
fprintf(stderr, "Error: bad sytax in line %d\n %s\n", |
|
|
|
fprintf(stderr, "Error: bad syntax in line %d\n %s\n", |
|
|
|
card->li_linenum_orig, card->li_line); |
|
|
|
controlled_exit(EXIT_BAD); |
|
|
|
} |
|
|
|
@ -4456,7 +4456,7 @@ inp_compat(struct line *card) |
|
|
|
delta = (lnumber-fnumber)/2.; |
|
|
|
lastlastno = gettok_node(&cut_line); |
|
|
|
if (!secondno || (*midline == 0) || (delta <= 0.) || !lastlastno) { |
|
|
|
fprintf(stderr, "Error: bad sytax in line %d\n %s\n", |
|
|
|
fprintf(stderr, "Error: bad syntax in line %d\n %s\n", |
|
|
|
card->li_linenum_orig, card->li_line); |
|
|
|
controlled_exit(EXIT_BAD); |
|
|
|
} |
|
|
|
|