[Pingus-CVS] r3484 - trunk/sexpr

[grumbel at BerliOS]

Author: grumbel
Date: 2007-11-04 12:46:50 +0100 (Sun, 04 Nov 2007)
New Revision: 3484

Modified:
   trunk/sexpr/parser.rb
Log:
fixed '.5' given a syntax error

Modified: trunk/sexpr/parser.rb
===================================================================
--- trunk/sexpr/parser.rb       2007-11-04 09:33:37 UTC (rev 3483)
+++ trunk/sexpr/parser.rb       2007-11-04 11:46:50 UTC (rev 3484)
@@ -143,7 +143,7 @@
     def scan(c)
       case @state
       when :look_for_token:
-          if is_digit(c) or is_sign(c) then
+          if is_digit(c) or is_sign(c) or c == ?. then
             @state = :parse_integer_or_real
           elsif c == ?\" then
             @state = :parse_string