compiler/extensions.st
changeset 519 1563dce3c5b4
parent 516 3b81c9e53352
child 522 837963c607a6
--- a/compiler/extensions.st	Mon Aug 17 23:11:56 2015 +0100
+++ b/compiler/extensions.st	Tue Aug 18 13:09:42 2015 +0100
@@ -863,14 +863,15 @@
 !RBLiteralValueNode methodsFor:'*petitcompiler'!
 
 isLiteralNumber
-    ((Smalltalk respondsTo: #isSmalltalk/X) and: [Smalltalk isSmalltalkX]) ifTrue:[
-    	^super isLiteralNumber
+    ((Smalltalk respondsTo: #isSmalltalkX) and: [Smalltalk isSmalltalkX]) ifTrue:[
+        ^super isLiteralNumber
     ] ifFalse:[
-    	"Assume Pharo..."
+        "Assume Pharo..."
          [(NumberParser on: self sourceText ) nextNumber] on: Exception do: [ ^ false ].
          ^ true
     ].
-    
+
+    "Modified: / 17-08-2015 / 23:17:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !RBProgramNode methodsFor:'*petitcompiler'!