changed #variable:expression:
authorClaus Gittinger <cg@exept.de>
Wed, 27 Feb 2008 15:50:58 +0100
changeset 2075 d1a4cd5ab035
parent 2074 3e86b9448c89
child 2076 cc6f48fbc595
changed #variable:expression:
AssignmentNode.st
--- a/AssignmentNode.st	Tue Feb 26 11:40:15 2008 +0100
+++ b/AssignmentNode.st	Wed Feb 27 15:50:58 2008 +0100
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libcomp' }"
 
 ParseNode subclass:#AssignmentNode
@@ -86,7 +85,7 @@
 
     "/ any block, which gets assigned to something
     "/ cannot be inlined.
-    e isBlockNode ifTrue:[
+    (e notNil and:[e isBlockNode]) ifTrue:[
         e possiblyInlined:false
     ]
 ! !
@@ -264,5 +263,5 @@
 !AssignmentNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/AssignmentNode.st,v 1.37 2006-08-09 11:59:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/AssignmentNode.st,v 1.38 2008-02-27 14:50:58 cg Exp $'
 ! !