*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Wed, 22 Sep 2004 12:02:11 +0200
changeset 8580 106f40c73275
parent 8579 da7c9101e7a4
child 8581 89cc7d8986e3
*** empty log message ***
MessageSend.st
--- a/MessageSend.st	Wed Sep 22 11:55:56 2004 +0200
+++ b/MessageSend.st	Wed Sep 22 12:02:11 2004 +0200
@@ -161,15 +161,9 @@
     "Modified: 20.3.1997 / 21:55:44 / cg"
 ! !
 
-!MessageSend methodsFor:'accessing'!
 
-numArgs
-    "return the number of arguments of the message"
 
-    ^ selector numArgs
-
-    "Modified: 23.4.1996 / 16:52:51 / cg"
-!
+!MessageSend methodsFor:'accessing'!
 
 receiver
     "return the receiver of the message"
@@ -205,21 +199,21 @@
     "evaluate the messagesend, with arg1 and arg2 instead of the original
      arguments"
 
-    ^  receiver perform:selector with:arg1 with:arg2
+    ^ receiver perform:selector with:arg1 with:arg2
 !
 
 value:arg1 value:arg2 value:arg3
     "evaluate the messagesend, with arg1, arg2 and arg3 instead of the original
      arguments"
 
-    ^  receiver perform:selector with:arg1 with:arg2 with:arg3
+    ^ receiver perform:selector with:arg1 with:arg2 with:arg3
 !
 
 valueWithArguments:argArray
     "evaluate the messagesend, with arguments taken from argArray,
      instead of the original arguments"
 
-    ^  receiver perform:selector withArguments:argArray
+    ^ receiver perform:selector withArguments:argArray
 ! !
 
 !MessageSend methodsFor:'printing & storing'!
@@ -244,5 +238,5 @@
 !MessageSend class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/MessageSend.st,v 1.17 2003-11-26 13:32:12 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MessageSend.st,v 1.18 2004-09-22 10:02:11 cg Exp $'
 ! !