equal
deleted
inserted
replaced
135 |isSend| |
135 |isSend| |
136 |
136 |
137 isSend := expression isMessage. |
137 isSend := expression isMessage. |
138 (lineNr notNil |
138 (lineNr notNil |
139 and:[isSend not]) ifTrue:[ |
139 and:[isSend not]) ifTrue:[ |
140 ParseNode codeLineNumber:lineNr on:aStream for:aCompiler |
140 self codeLineNumber:lineNr on:aStream for:aCompiler |
141 ]. |
141 ]. |
142 |
142 |
143 expression codeOn:aStream inBlock:b for:aCompiler. |
143 expression codeOn:aStream inBlock:b for:aCompiler. |
144 expression isBlock ifTrue:[ |
144 expression isBlock ifTrue:[ |
145 variable isLocal ifTrue:[ |
145 variable isLocal ifTrue:[ |
147 ] |
147 ] |
148 ]. |
148 ]. |
149 |
149 |
150 (lineNr notNil |
150 (lineNr notNil |
151 and:[isSend]) ifTrue:[ |
151 and:[isSend]) ifTrue:[ |
152 ParseNode codeLineNumber:lineNr on:aStream for:aCompiler |
152 self codeLineNumber:lineNr on:aStream for:aCompiler |
153 ]. |
153 ]. |
154 variable codeStoreOn:aStream inBlock:b valueNeeded:forValue for:aCompiler |
154 variable codeStoreOn:aStream inBlock:b valueNeeded:forValue for:aCompiler |
155 |
155 |
156 "Modified: 4.9.1995 / 14:38:10 / claus" |
156 "Modified: 4.9.1995 / 14:38:10 / claus" |
157 "Created: 1.3.1996 / 00:41:43 / cg" |
157 "Created: 1.3.1996 / 00:41:43 / cg" |
211 ! ! |
211 ! ! |
212 |
212 |
213 !AssignmentNode class methodsFor:'documentation'! |
213 !AssignmentNode class methodsFor:'documentation'! |
214 |
214 |
215 version |
215 version |
216 ^ '$Header: /cvs/stx/stx/libcomp/AssignmentNode.st,v 1.26 1998-05-14 17:33:53 cg Exp $' |
216 ^ '$Header: /cvs/stx/stx/libcomp/AssignmentNode.st,v 1.27 1999-02-25 14:49:27 cg Exp $' |
217 ! ! |
217 ! ! |