--- a/ParseNode.st	Wed Oct 30 21:10:24 2013 +0100
+++ b/ParseNode.st	Wed Oct 30 21:11:51 2013 +0100
@@ -348,6 +348,12 @@
 
 !ParseNode methodsFor:'enumeration'!
 
+allNodesDo:aBlock
+    "evaluate aBlock for each variable-node here and in subnodes"
+
+    aBlock value:self
+!
+
 messageNodesDo:aBlock
     "evaluate aBlock for each message-node here and in subnodes"
 
@@ -355,7 +361,7 @@
 !
 
 messageSelectors
-    "return a collection of message seelctors"
+    "return a collection of message selectors"
 
     |setOfSymbols|
 
@@ -716,10 +722,10 @@
 !ParseNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ParseNode.st,v 1.75 2013-09-03 22:35:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParseNode.st,v 1.76 2013-10-30 20:11:51 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/ParseNode.st,v 1.75 2013-09-03 22:35:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParseNode.st,v 1.76 2013-10-30 20:11:51 stefan Exp $'
 ! !