--- a/AssignmentNode.st	Sat Aug 08 22:49:53 2020 +0100
+++ b/AssignmentNode.st	Tue Aug 25 12:20:06 2020 +0100
@@ -155,7 +155,6 @@
     "Modified: / 27-07-2011 / 13:50:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-
 !AssignmentNode methodsFor:'code generation'!
 
 checkIncDecOn:aStream
@@ -281,6 +280,11 @@
     expression allNodesDo:aBlock
 !
 
+childrenDo:aBlock
+    aBlock value:variable.
+    aBlock value:expression.
+!
+
 messagesDo:aBlock
     "evaluate aBlock for each message-node here and in subnodes"
 
@@ -293,6 +297,15 @@
     ^ anEnumerator doAssignment:self variable:variable value:expression
 
     "Modified: 19.6.1997 / 16:37:50 / cg"
+!
+
+variableNodesDo:aBlock
+    "evaluate aBlock for each variable-node in this node and subnodes"
+
+    aBlock value:variable.
+    expression variableNodesDo:aBlock.
+
+    "Created: / 27-03-2020 / 12:45:37 / Stefan Vogel"
 ! !
 
 !AssignmentNode methodsFor:'enumeration'!