diff options
Diffstat (limited to 'parser.c')
| -rw-r--r-- | parser.c | 16 |
1 files changed, 8 insertions, 8 deletions
@@ -75,7 +75,7 @@ Term *curlybracketterm(void); Term *compound(void); Term *parseoperators(Term *); void match(int); -void syntaxerror(char *); +void syntaxerror_parser(char *); Term *prologtext(int); Term * @@ -111,7 +111,7 @@ prologtext(int querymode) if(!querymode) match(AtomTok); }else - syntaxerror("prologtext"); + syntaxerror_parser("prologtext"); if(querymode) return t; @@ -131,7 +131,7 @@ prologtext(int querymode) t->next = prologtext(querymode); }else{ print("Expected directive or clause as toplevel\n"); - syntaxerror("prologtext"); + syntaxerror_parser("prologtext"); } return t; @@ -194,7 +194,7 @@ term(void) break; default: print("Can't parse term of token type %d\n", lookahead.tag); - syntaxerror("term"); + syntaxerror_parser("term"); result = nil; } @@ -298,7 +298,7 @@ parseoperators(Term *list) for(i = 0; i < length; i++) print("%S(%d) ", prettyprint(terms[i]), infos[i].level); print("\n"); - syntaxerror("parseoperators"); + syntaxerror_parser("parseoperators"); } int infixlevel = infos[index].type & (Xfx|Xfy|Yfx); @@ -338,7 +338,7 @@ parseoperators(Term *list) } }else{ print("Parse error when parsing operator %S (prefix=%d, postfix=%d, infix=%d level=%d)\n", prettyprint(terms[index]), prefixlevel, postfixlevel, infixlevel, infos[index].level); - syntaxerror("parseoperators"); + syntaxerror_parser("parseoperators"); } } @@ -648,11 +648,11 @@ match(int tag) if(lookahead.tag == tag) nexttoken(); else - syntaxerror("match"); + syntaxerror_parser("match"); } void -syntaxerror(char *where) +syntaxerror_parser(char *where) { print("Syntax error: Unexpected %d (%S) token in %s\n", lookahead.tag, lookahead.text, where); exits("syntax error"); |