Allow real number with leading - sign

This commit is contained in:
Marty Kraimer
1998-11-18 16:20:12 +00:00
parent 30c1e46737
commit bf5f43d8f0
+1 -1
View File
@@ -37,7 +37,7 @@ static int yyreset(void)
return(tokenSTRING);
}
([0-9]+|([0-9]*\.[0-9]+)([eE][-+]?[0-9]+)?) { /*real number*/
-?(([0-9]+)|([0-9]*\.[0-9]+)([eE][-+]?[0-9]+)?) { /*real number*/
yylval.Str = (char *)dbmfMalloc(strlen(yytext)+1);
strcpy(yylval.Str,yytext);
return(tokenSTRING);