A new version of Kernel was added to project The Inbox:
http://source.squeak.org/inbox/Kernel-cbc.1163.mcz==================== Summary ====================
Name: Kernel-cbc.1163
Author: cbc
Time: 21 March 2018, 9:09:20.773568 pm
UUID: 45d9dad8-7c81-034e-b578-b9ccd291cab6
Ancestors: Kernel-dtl.1162, Kernel-fn.1152
Update #xor: to work with argument being a block as well.
=============== Diff against Kernel-dtl.1162 ===============
Item was added:
+ ----- Method: Boolean>>xor: (in category 'logical operations') -----
+ xor: aBoolean
+ "Exclusive OR. Answer true if the receiver is not equivalent to aBoolean."
+
+ ^(self == aBoolean) not!
Item was changed:
----- Method: False>>xor: (in category 'logical operations') -----
xor: aBoolean
+ "aBoolean is either a boolean, or an object who's #value returns a boolean (usually a block)."
+ ^aBoolean value ifTrue: [ true ] ifFalse: [ false ]!
- "Posted by Eliot Miranda to squeak-dev on 3/24/2009"
-
- ^aBoolean!
Item was changed:
----- Method: True>>xor: (in category 'logical operations') -----
xor: aBoolean
+ "aBoolean is either a boolean, or an object who's #value returns a boolean (usually a block)."
+ ^aBoolean value ifTrue: [ false ] ifFalse: [ true ]!
- "Posted by Eliot Miranda to squeak-dev on 3/24/2009"
-
- ^aBoolean not!