/* $Header: qmsmaplex.l,v 1.1 88/01/15 12:19:06 simpson Rel $ */ %{ /* $Log: qmsmaplex.l,v $ * Revision 1.1 88/01/15 12:19:06 simpson * initial release * * Revision 0.1 87/12/11 21:34:45 simpson * beta test * */ #undef input #define input() (((yytchar=yysptr>yysbuf?U(*--yysptr):timedgetc(_Ifp)) \ ==10?(yylineno++, yytchar):yytchar)==EOF?0:yytchar) %} hex [0-9A-F] %% MAP: return MAP; MAPEND return MAPEND; ^Q{hex}{hex}{hex}{hex} { (void)strcpy(yylval.s, yytext); return BYTECOUNT; } {hex}+ { (void)strcpy(yylval.s, yytext); return DATA; } \r\n return ENDLINE;