scanner.lex

   1 %{
   2 #include "parser.h"
   3 %}
   4
   5 %%
   6
   7  /* Quoting all string in order to facilitate for
   8     emacs's C module :-) */
   9 [ \t\n] ;                       /* skip ws */
  10 "if" { return IF; }
  11 "elsif" { return ELSIF; }
  12 "else" { return ELSE; }
  13 "while" { return WHILE; }
  14 "my" { return MY; }
  15 "write_int" { return WRT_INT; }
  16 "break" { return BREAK; }
  17 "continue" { return CONTINUE; }
  18
  19 [a-zA-Z_][a-zA-Z0-9_]* {
  20   yylval.id = strdup(yytext);
  21   return IDENTIFIER;
  22 }
  23 [$][a-zA-Z_][a-zA-Z0-9_]* {
  24   yylval.id = strdup(yytext);
  25   return VARIABLE;
  26 }
  27 [0-9]+ {
  28   yylval.ival = atoi(yytext);
  29   return INTEGER;
  30 }
  31 . { return yytext[0]; }
  32
  33 %%