Message.st
changeset 5751 ceba525a9c2a
parent 5591 08ada63daf2a
child 6062 c8b8b9d382f1
equal deleted inserted replaced
5750:4b3eae08b84b 5751:ceba525a9c2a
    87 
    87 
    88 selector:aSymbol argument:anArg
    88 selector:aSymbol argument:anArg
    89     "return a new message object for a send with one argument"
    89     "return a new message object for a send with one argument"
    90 
    90 
    91     ^ self basicNew setSelector:aSymbol arguments:(Array with:anArg)
    91     ^ self basicNew setSelector:aSymbol arguments:(Array with:anArg)
       
    92 !
       
    93 
       
    94 selector:aSymbol argument:arg1 argument:arg2
       
    95     "return a new message object for a send with two arguments"
       
    96 
       
    97     ^ self basicNew setSelector:aSymbol arguments:(Array with:arg1 with:arg2)
    92 !
    98 !
    93 
    99 
    94 selector:aSymbol arguments:argArray
   100 selector:aSymbol arguments:argArray
    95     "return a new message object for a send with many arguments"
   101     "return a new message object for a send with many arguments"
    96 
   102 
   185 ! !
   191 ! !
   186 
   192 
   187 !Message class methodsFor:'documentation'!
   193 !Message class methodsFor:'documentation'!
   188 
   194 
   189 version
   195 version
   190     ^ '$Header: /cvs/stx/stx/libbasic/Message.st,v 1.22 2000-09-05 18:50:10 cg Exp $'
   196     ^ '$Header: /cvs/stx/stx/libbasic/Message.st,v 1.23 2000-12-15 16:48:21 cg Exp $'
   191 ! !
   197 ! !