src/comerr/et_lex.lex.l

   1 PC      [^\"]
   2 AN      [A-Z_a-z0-9]
   3 %%
   4
   5 error_table     return ERROR_TABLE;
   6 et              return ERROR_TABLE;
   7 error_code      return ERROR_CODE_ENTRY;
   8 ec              return ERROR_CODE_ENTRY;
   9 end             return END;
  10
  11 [\t\n\r ]               ;
  12
  13 \"{PC}*\"       { register char *p; yylval.dynstr = ds((char *)yytext+1);
  14                   if ((p=strrchr(yylval.dynstr, '"'))) *p='\0';
  15                   return QUOTED_STRING;
  16                 }
  17
  18 {AN}*   { yylval.dynstr = ds((char *)yytext); return STRING; }
  19
  20 #.*\n           ;
  21
  22 .               { return (*yytext); }
  23 %%
  24 /* Copyright (C)  1998  Transarc Corporation.  All rights reserved.
  25  *
  26  */
  27 int yywrap(void) {
  28   return 1;
  29 }