[squeak-dev] The Trunk: Kernel-ct.1376.mcz
commits at source.squeak.org
commits at source.squeak.org
Mon Nov 15 13:18:40 UTC 2021
Marcel Taeumel uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-ct.1376.mcz
==================== Summary ====================
Name: Kernel-ct.1376
Author: ct
Time: 2 March 2021, 7:16:36.10917 pm
UUID: 4c5758e1-3727-f04b-86c3-e9fe79a65db4
Ancestors: Kernel-jar.1375
Adds #cull:cull:cull:cull:cull: (for five args) analogously to #value:value:value:value:.
=============== Diff against Kernel-jar.1375 ===============
Item was added:
+ ----- Method: BlockClosure>>cull:cull:cull:cull:cull: (in category 'evaluating') -----
+ cull: firstArg cull: secondArg cull: thirdArg cull: fourthArg cull: fifthArg
+ "Activate the receiver, with five or less arguments."
+ <primitive: 206> "Handle the five argument case primitively"
+
+ ^ numArgs
+ caseOf: {
+ [5] -> [self value: firstArg value: secondArg value: thirdArg value: fourthArg value: fifthArg].
+ [4] -> [self value: firstArg value: secondArg value: thirdArg value: fourthArg].
+ [3] -> [self value: firstArg value: secondArg value: thirdArg].
+ [2] -> [self value: firstArg value: secondArg].
+ [1] -> [self value: firstArg].
+ [0] -> [self value] }
+ otherwise: [self numArgsError: numArgs]!
Item was added:
+ ----- Method: FullBlockClosure>>cull:cull:cull:cull:cull: (in category 'evaluating') -----
+ cull: firstArg cull: secondArg cull: thirdArg cull: fourthArg cull: fifthArg
+ "Activate the receiver, with five or less arguments."
+ <primitive: 207> "Handle the five argument case primitively"
+
+ ^ numArgs
+ caseOf: {
+ [5] -> [self value: firstArg value: secondArg value: thirdArg value: fourthArg value: fifthArg].
+ [4] -> [self value: firstArg value: secondArg value: thirdArg value: fourthArg].
+ [3] -> [self value: firstArg value: secondArg value: thirdArg].
+ [2] -> [self value: firstArg value: secondArg].
+ [1] -> [self value: firstArg].
+ [0] -> [self value] }
+ otherwise: [self numArgsError: numArgs]!
Item was added:
+ ----- Method: MessageSend>>cull:cull:cull:cull:cull: (in category 'evaluating') -----
+ cull: firstArg cull: secondArg cull: thirdArg cull: fourthArg cull: fifthArg
+ "Send the message with these optional arguments and answer the return value"
+
+ ^ selector numArgs caseOf: {
+ [5] -> [self value: firstArg value: secondArg value: thirdArg value: fourthArg value: fifthArg].
+ [4] -> [self value: firstArg value: secondArg value: thirdArg value: fourthArg].
+ [3] -> [self value: firstArg value: secondArg value: thirdArg].
+ [2] -> [self value: firstArg value: secondArg].
+ [1] -> [self value: firstArg].
+ [0] -> [self value] }!
More information about the Squeak-dev
mailing list
|