Details | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 2 | mjames | 1 | %{ |
| 2 | #include "Parser.h" |
||
| 3 | %} |
||
| 4 | |||
| 5 | blanks [ \t\n]+ |
||
| 6 | identifier [_a-zA-Z0-9]+ |
||
| 7 | |||
| 8 | %% |
||
| 9 | |||
| 10 | {blanks} { /* ignore */ } |
||
| 11 | |||
| 12 | "procedure" return(PROCEDURE); |
||
| 13 | "{" return(BLOCK); |
||
| 14 | "}" return(ENDBLOCK); |
||
| 15 | |||
| 16 | {identifier} { |
||
| 17 | yylval.sval = malloc(strlen(yytext)); |
||
| 18 | strncpy(yylval.sval, yytext, strlen(yytext)); |
||
| 19 | return(IDENTIFIER); |
||
| 20 | } |
||
| 21 |