From 7f0551e5380929cd57a7bef5a4694ba5dea94aab Mon Sep 17 00:00:00 2001
From: kintel <kintel@b57f626f-c46c-0410-a088-ec61d464b74c>
Date: Tue, 2 Nov 2010 14:17:03 +0000
Subject: TOK_NUMBER lexer improvement by Steven Dick

git-svn-id: http://svn.clifford.at/openscad/trunk@579 b57f626f-c46c-0410-a088-ec61d464b74c

diff --git a/src/lexer.l b/src/lexer.l
index e0e70eb..49243fd 100644
--- a/src/lexer.l
+++ b/src/lexer.l
@@ -65,6 +65,8 @@ extern const char *parser_source_path;
 
 %x comment
 
+DIGIT [0-9]
+
 %%
 
 include[ \t\r\n>]*"<"[^ \t\r\n>]+">" {
@@ -135,7 +137,7 @@ use[ \t\r\n>]*"<"[^ \t\r\n>]+">" {
 "false"		return TOK_FALSE;
 "undef"		return TOK_UNDEF;
 
-[0-9][0-9.]* { parserlval.number = QString(yytext).toDouble(); return TOK_NUMBER; }
+{DIGIT}+|{DIGIT}*\.{DIGIT}+|{DIGIT}+\.{DIGIT}* { parserlval.number = QString(yytext).toDouble(); return TOK_NUMBER; }
 "$"?[a-zA-Z0-9_]+ { parserlval.text = strdup(yytext); return TOK_ID; }
 
 \"[^"]*\" {
-- 
cgit v0.10.1