compiler/PPCInliningVisitor.st
changeset 502 1e45d3c96ec5
parent 464 f6d77fee9811
child 503 ff58cd9f1f3c
child 515 b5316ef15274
--- a/compiler/PPCInliningVisitor.st	Thu May 21 14:12:22 2015 +0100
+++ b/compiler/PPCInliningVisitor.st	Fri Jul 24 15:06:54 2015 +0100
@@ -37,6 +37,13 @@
     ^ node
 !
 
+visitActionNode: node
+    node child markForInline.
+    ^ super visitActionNode: node.
+
+    "Created: / 13-05-2015 / 16:25:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 visitCharSetPredicateNode: node
     ^ self markForInline: node
 !