diff options
Diffstat (limited to 'dviware/quicspool/libqmsquery/qmsfntlex.l')
-rw-r--r-- | dviware/quicspool/libqmsquery/qmsfntlex.l | 43 |
1 files changed, 43 insertions, 0 deletions
diff --git a/dviware/quicspool/libqmsquery/qmsfntlex.l b/dviware/quicspool/libqmsquery/qmsfntlex.l new file mode 100644 index 0000000000..ea94910f97 --- /dev/null +++ b/dviware/quicspool/libqmsquery/qmsfntlex.l @@ -0,0 +1,43 @@ +/* $Header: qmsfntlex.l,v 1.1 88/01/15 12:19:00 simpson Rel $ */ +%{ +/* +$Log: qmsfntlex.l,v $ + * Revision 1.1 88/01/15 12:19:00 simpson + * initial release + * + * Revision 0.1 87/12/11 21:34:44 simpson + * beta test + * +*/ +#undef input +#define input() (((yytchar=yysptr>yysbuf?U(*--yysptr):timedgetc(_Ifp)) \ + ==10?(yylineno++, yytchar):yytchar)==EOF?0:yytchar) +%} +integer [0-9]+ +%% +FRO: { + yylval = FRO; + return FRO; + } +FDL: { + yylval = FDL; + return FDL; + } +{integer} { + yylval = atoi(yytext); + return INTEGER; + } +P | +L | +S | +V | +C { + yylval = yytext[0]; + return yytext[0]; + } +. { + yylval = yytext[0]; + return CHAR; + } +NONE return NONE; +\r\n return ENDLINE; |