Casanova

RELOP       ">="|"<="|"=="|"!="
CHAR        [A-Za-z_]
DIGIT       [0-9]
NUMBER      DIGIT+
ID          CHAR(CHAR|DIGIT)*
TYPE        "int"|"long"|"short"|"double"|"float"
LOOP        "while"|"for"|"do"*"until"
%%


ID          fprintf (yyout,"%s",*yytext);
[ \t\n]+        ;       /* ignore whitespace */


%%
int yywrap(void) {
    return 1;
}