--- a/AssignmentNode.st	Mon Jun 28 10:15:08 1999 +0200
+++ b/AssignmentNode.st	Tue Jun 29 12:04:19 1999 +0200
@@ -80,7 +80,13 @@
 
 variable:v expression:e
     variable := v.
-    expression := e
+    expression := e.
+
+    "/ any block, which gets assigned to something
+    "/ cannot be inlined.
+    e isBlockNode ifTrue:[
+        e possiblyInlined:false
+    ]
 ! !
 
 !AssignmentNode methodsFor:'code generation'!
@@ -251,5 +257,5 @@
 !AssignmentNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/AssignmentNode.st,v 1.29 1999-06-26 14:31:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/AssignmentNode.st,v 1.30 1999-06-29 10:04:08 cg Exp $'
 ! !