Return to scan.l CVS log | Up to [local] / src / usr.bin / bc |
version 1.5, 2003/09/28 07:57:57 | version 1.6, 2003/09/29 03:24:27 | ||
---|---|---|---|
|
|
||
} | } | ||
\\\n[ \t]* lineno++; | \\\n[ \t]* lineno++; | ||
[^0-9A-F\.] { | [^0-9A-F\.] { | ||
if (strcmp(strbuf, ".") == 0) { | BEGIN(INITIAL); | ||
yyerror("syntax error"); | unput(yytext[0]); | ||
BEGIN(INITIAL); | if (strcmp(strbuf, ".") == 0) | ||
REJECT; | return DOT; | ||
} | |||
else { | else { | ||
BEGIN(INITIAL); | |||
yylval.str = strbuf; | yylval.str = strbuf; | ||
unput(yytext[0]); | |||
return NUMBER; | return NUMBER; | ||
} | } | ||
} | } |