]> andersk Git - moira.git/blob - util/et/et_lex.lex.l
Import latest com_err sources from Athena
[moira.git] / util / et / et_lex.lex.l
1 %{
2 #undef yywrap
3 int num_lines = 0;
4 %}
5
6 PC      [^\"]
7 AN      [A-Z_a-z0-9]
8 %%
9 \n              ++num_lines;
10
11 error_table     return ERROR_TABLE;
12 et              return ERROR_TABLE;
13 error_code      return ERROR_CODE_ENTRY;
14 ec              return ERROR_CODE_ENTRY;
15 end             return END;
16
17 [\t\n ]         ;
18
19 \"{PC}*\"       { register char *p; yylval.dynstr = ds(yytext+1);
20                   p=strrchr(yylval.dynstr, '"');
21                   if (p) *p='\0';
22                   return QUOTED_STRING;
23                 }
24
25 {AN}*   { yylval.dynstr = ds(yytext); return STRING; }
26
27 #.*\n           ;
28
29 .               { return (*yytext); }
30 %%
31 static const char l_rcsid[] = "$Id$";
32
33 int yywrap()
34 {
35         return 1;
36 }
This page took 0.075619 seconds and 5 git commands to generate.