made acceptable for flex (no yyless() callable from other source file)
authorceriel <none@none>
Fri, 11 Jan 1991 14:36:37 +0000 (14:36 +0000)
committerceriel <none@none>
Fri, 11 Jan 1991 14:36:37 +0000 (14:36 +0000)
modules/src/em_opt/parser.g
modules/src/em_opt/syntax.l

index 4f52204..bb81999 100644 (file)
@@ -487,7 +487,7 @@ LLmessage(insertedtok)
        fprintf(stderr,"parser: syntax error on line %d: ",linenum);
        if(insertedtok) {
                fprintf(stderr,"Inserted token %d\n",insertedtok);
-               yyless(0);
+               back_token();
        }
        else fprintf(stderr,"Deleted token %d\n",LLsymb);
 }
index 7cb7dda..510ca26 100644 (file)
@@ -58,3 +58,8 @@ offset                return(OFFSET);
 \n             { linenum++; return(yytext[0]);}
 .              return(yytext[0]);
 %%
+
+back_token()
+{
+       yyless(0);
+}