summaryrefslogtreecommitdiff
path: root/tools/d2c/rules/tokens.l
blob: 36d6c4ac46ca0d25f20bfb95b1e9bc43fa26089a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57

%top {

#include "grammar.h"

}


%option noyywrap
%option nounput
%option noinput
%option yylineno
%option stack
%option noyy_top_state

%x cond
%x cond_binval
%x cond_hexval
%x action
%x raw_line


%%


\/\/[^\n]+          { printf("SKIP '%s'\n", yytext); }

"if"                            { yy_push_state(cond); return IF; }
<cond>[ ]+                      { }
<cond>"("                       { return EXPR_START; }
<cond>[A-Za-z_][A-Za-z0-9_]*    { yylvalp->string = strdup(yytext); return NAME; }
<cond>"=="                      { return EQUAL; }
<cond>"'"                       { yy_push_state(cond_binval); }
<cond_binval>[01][01]*          { yylvalp->string = strdup(yytext); return BINVAL; }
<cond_binval>"'"                { yy_pop_state(); }
<cond>"0x"                      { yy_push_state(cond_hexval); }
<cond_hexval>[0-9a-f][0-9a-f]*  { yylvalp->string = strdup(yytext); yy_pop_state(); return HEXVAL; }
<cond>")"                       { return EXPR_END; }
<cond>"&&"                      { return AND; }
<cond>"&"                       { return AND_LOG; }

<cond>";"           { yy_pop_state(); return THEN; }

[ ]                 { }

"see "              { yy_push_state(raw_line); return SEE; }

"unpredictable"     { return UNPREDICTABLE; }

"call"              { yy_push_state(raw_line); return CALL; }
"chk_call"          { yy_push_state(raw_line); return CHK_CALL; }

<raw_line>[^\n]+    { yylvalp->cstring = yytext; return RAW_LINE; }
<raw_line>"\n"      { yy_pop_state(); }


%%