--- a/ParseNodeVisitor.st	Fri Sep 02 17:35:56 2016 +0100
+++ b/ParseNodeVisitor.st	Tue Sep 06 06:59:40 2016 +0200
@@ -145,7 +145,11 @@
 !
 
 visitStatementNode:anObject 
-    self visit: anObject expression.
+    |expr|
+
+    (expr := anObject expression) notNil ifTrue:[
+        self visit: expr.
+    ]
 !
 
 visitSuperNode:anObject