--- a/Scanner.st	Wed Feb 08 20:15:55 2006 +0100
+++ b/Scanner.st	Mon Feb 13 23:03:45 2006 +0100
@@ -2305,8 +2305,7 @@
 
 nextNumber
     "scan a number; handles radix prefix, mantissa and exponent.
-     Does not yet handle fixNums. Allows for e, d or q to be used as exponent
-     limiter."
+     Allows for e, d or q to be used as exponent limiter."
 
     |pos1 nextChar value integerPart s tokenRadix mantissaAndScaledPart d type exp|
 
@@ -2387,7 +2386,7 @@
             value := value asFloat.
         ].
 
-        AllowFixedPointLiterals == true ifTrue:[
+        parserFlags allowFixedPointLiterals == true ifTrue:[
             "/ Dolphin scaledDecimal numbers
             ('s' includes:nextChar) ifTrue:[
                 nextChar := source nextPeek.
@@ -3041,7 +3040,7 @@
 !Scanner class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.210 2006-02-08 15:32:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Scanner.st,v 1.211 2006-02-13 22:03:45 cg Exp $'
 ! !
 
 Scanner initialize!