(* Lexical analyzer for the sample Yacc program in Tp4.y. *) %% [1]+ begin yylval.yyInteger:=yyleng; return(NUM) end; " " ; . | \n returnc(yytext[1]);