--- a/StatementNode.st	Fri Aug 19 15:35:09 2011 +0200
+++ b/StatementNode.st	Sat Aug 20 20:08:03 2011 +0200
@@ -60,12 +60,14 @@
 
     expression notNil ifTrue:[expression parent: nil].
     expression := something.
-    expression notNil ifTrue:[expression parent: self].
-
-    startPosition := expression startPosition.
-    endPosition := expression endPosition.
+    expression notNil ifTrue:[
+        expression parent: self.
+        startPosition := expression startPosition.
+        endPosition := expression endPosition.
+    ].
 
     "Modified: / 27-07-2011 / 13:51:54 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 20-08-2011 / 20:00:56 / cg"
 !
 
 isStatement
@@ -353,7 +355,7 @@
 !StatementNode class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/StatementNode.st,v 1.41 2011-07-27 15:02:29 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/StatementNode.st,v 1.42 2011-08-20 18:08:03 cg Exp $'
 !
 
 version_SVN