Support hexadecimal numbers

This commit is contained in:
2007-04-29 14:35:50 +00:00
parent 10ac321771
commit 13c0bc9b5a

View File

@@ -105,6 +105,8 @@ return return TOKRETURN;
[0-9]+ yylval.Tinteger = atoi(yytext); return NUMBER;
-[0-9]+ yylval.Tinteger = atoi(yytext); return NUMBER;
0x[0-9]+ yylval.Tinteger = strtol(yytext+2, (char **)NULL, 16); return NUMBER;
-0x[0-9]+ yylval.Tinteger = strtol(yytext+2, (char **)NULL, 16); return NUMBER;
[0-9]+\.[0-9]+ yylval.Treal = atof(yytext); return REAL;
-[0-9]+\.[0-9]+ yylval.Treal = atof(yytext); return REAL;
[_a-zA-Z0-9]+ yylval.Tstring = strdup(yytext); return IDENTIFIER;