]> andersk Git - moira.git/blob - util/et/et_lex.lex.l
sync'ing files for RCS->CVS migration
[moira.git] / util / et / 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 ]         ;
12
13 \"{PC}*\"       { register char *p; yylval.dynstr = ds(yytext+1);
14                   if (p=rindex(yylval.dynstr, '"')) *p='\0';
15                   return QUOTED_STRING;
16                 }
17
18 {AN}*   { yylval.dynstr = ds(yytext); return STRING; }
19
20 #.*\n           ;
21
22 .               { return (*yytext); }
23 %%
24 #ifndef lint
25 static char rcsid_et_lex_lex_l[] = "$Header$";
26 #endif
This page took 0.039135 seconds and 5 git commands to generate.