MessageNode.st
changeset 1134 bbfa2ca221da
parent 1093 41e224d479b5
child 1154 8c8787349aaf
--- a/MessageNode.st	Tue Dec 19 19:55:01 2000 +0100
+++ b/MessageNode.st	Tue Dec 19 19:55:10 2000 +0100
@@ -859,7 +859,7 @@
         ^ self
     ].
     "need 16bit litIndex"
-    noSendDrop ifTrue:[
+    true "noSendDrop" ifTrue:[
         aStream nextPut:#sendL; nextPut:lineNr; nextPut:litIndex; nextPut:0; nextPut:nargs.
         aStream nextPut:#drop.
     ] ifFalse:[
@@ -2075,7 +2075,7 @@
         ^ self
     ].
 
-    (noSendDrop or:[valueNeeded]) ifTrue:[
+    true "(noSendDrop or:[valueNeeded])" ifTrue:[
         code := #sendL
     ] ifFalse:[
         code := #sendDropL
@@ -3049,5 +3049,5 @@
 !MessageNode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.117 2000-10-11 12:47:36 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.118 2000-12-19 18:55:10 tm Exp $'
 ! !