compiler/PPCInliningVisitor.st
changeset 516 3b81c9e53352
parent 509 fd22630c7e62
parent 515 b5316ef15274
child 525 751532c8f3db
--- a/compiler/PPCInliningVisitor.st	Fri Jul 31 14:07:31 2015 +0100
+++ b/compiler/PPCInliningVisitor.st	Mon Aug 17 12:56:02 2015 +0100
@@ -104,10 +104,13 @@
 !
 
 visitTokenConsumeNode: node
-    super visitTokenConsumeNode: node.
+    "super visitTokenConsumeNode: node."
+
     node name isNil ifTrue: [ 
-        self markForInline: node
+        self flag: 'temporarily disabled'.
+        "self markForInline: node"
     ].
+
     ^ node
 !
 
@@ -126,8 +129,12 @@
 !
 
 visitTokenizingParserNode: node
-    self visit: node tokenizer.
+    "skip tokens"
+    "skip whitespace"
+    "self visit: node whitespace."
+
     self visit: node parser.
+    
     ^ node
 ! !