A new version of Kernel was added to project The Inbox:
http://source.squeak.org/inbox/Kernel-ct.1298.mcz==================== Summary ====================
Name: Kernel-ct.1298
Author: ct
Time: 14 February 2020, 3:34:45.300118 pm
UUID: 0f42bad1-e830-8a48-ad42-9dfea69e1176
Ancestors: Kernel-tonyg.1293
Documents the small but essential difference between #sendTo: and #sentTo:
=============== Diff against Kernel-tonyg.1293 ===============
Item was changed:
----- Method: Message>>sendTo: (in category 'sending') -----
+ sendTo: aReceiver
+ "Answer the result of sending this message to aReceiver"
- sendTo: receiver
- "answer the result of sending this message to receiver"
+ ^ aReceiver perform: selector withArguments: args!
- ^ receiver perform: selector withArguments: args!
Item was changed:
----- Method: Message>>sentTo: (in category 'sending') -----
+ sentTo: aReceiver
+ "Answer the result of sending this message to receiver. Kind of private!! To send the message to a different receiver (for example, via #doesNotUnderstand:), use #sendTo: instead."
- sentTo: receiver
- "answer the result of sending this message to receiver"
+ ^ lookupClass == nil
+ ifTrue: [aReceiver perform: selector withArguments: args]
+ ifFalse: [aReceiver perform: selector withArguments: args inSuperclass: lookupClass]!
- lookupClass == nil
- ifTrue: [^ receiver perform: selector withArguments: args]
- ifFalse: [^ receiver perform: selector withArguments: args inSuperclass: lookupClass]!
Item was changed:
----- Method: Message>>storeOn: (in category 'printing') -----
storeOn: aStream
+ "Refer to the comment in Object >> storeOn:."
- "Refer to the comment in Object|storeOn:."
aStream nextPut: $(;
+ nextPutAll: self class name;
+ nextPutAll: ' selector: ';
+ store: selector;
+ nextPutAll: ' arguments: ';
+ store: args;
+ nextPut: $).!
- nextPutAll: self class name;
- nextPutAll: ' selector: ';
- store: selector;
- nextPutAll: ' arguments: ';
- store: args;
- nextPut: $)!