--- a/compiler/PPCInliningVisitor.st	Sat May 16 19:21:00 2015 +0100
+++ b/compiler/PPCInliningVisitor.st	Wed May 20 16:47:52 2015 +0100
@@ -9,6 +9,7 @@
 	category:'PetitCompiler-Visitors'
 !
 
+
 !PPCInliningVisitor methodsFor:'initialization'!
 
 initialize
@@ -37,6 +38,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
 !
@@ -109,3 +117,10 @@
     ^ node
 ! !
 
+!PPCInliningVisitor class methodsFor:'documentation'!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
+! !
+