#UI_ENHANCEMENT by cg
authorClaus Gittinger <cg@exept.de>
Mon, 02 May 2016 14:12:22 +0200
changeset 3807 b310b46dae58
parent 3806 7999646d7ef8
child 3808 587f0cae3cbe
child 3809 2f5d6ccf4b9e
#UI_ENHANCEMENT by cg class: ParseNodeVisitor comment/format in: #visitSelfNode: #visitStatementNode: #visitSuperNode: #visitVariableNode: changed: #visitReturnNode: #visitUnaryNode:
ParseNodeVisitor.st
--- a/ParseNodeVisitor.st	Mon May 02 14:05:21 2016 +0200
+++ b/ParseNodeVisitor.st	Mon May 02 14:12:22 2016 +0200
@@ -112,39 +112,27 @@
 !
 
 visitReturnNode:anObject 
-
-    self visitStatementNode: anObject
-
-    "Modified: / 25-07-2011 / 22:34:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    self visit: anObject expression.
 !
 
-visitSelfNode:anObject
-
-    "Modified: / 25-07-2011 / 22:38:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+visitSelfNode:anObject 
+    "/ to be redefined in subclasses
 !
 
 visitStatementNode:anObject 
-
     self visit: anObject expression.
-
-    "Modified: / 25-07-2011 / 22:34:44 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-visitSuperNode:anObject
-
-    "Modified: / 25-07-2011 / 22:38:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+visitSuperNode:anObject 
+    "/ to be redefined in subclasses
 !
 
 visitUnaryNode:anObject 
-
-    self visitMessageNode: anObject
-
-    "Modified: / 25-07-2011 / 22:38:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    ^self visitMessageNode: anObject
 !
 
-visitVariableNode:anObject
-
-    "Modified: / 25-07-2011 / 22:38:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+visitVariableNode:anObject 
+    "/ to be redefined in subclasses
 ! !
 
 !ParseNodeVisitor class methodsFor:'documentation'!