Results in

‘detect: detectBlock ifNone: noneBlock’

—
Have a good one; keep it, light.
Kindly, rabbit . .. … ‘…^,^ 🐇🐇🐇

Sent from Callisto House mobile - Ganymede
:: decentralized mobile homeless solutions ::

On Thu, Jan 12, 2023 at 13:37, rabbit <rabbit at callistohouse.org> wrote:

> Better is:
>
> methodSignature := ‘detect:ifNone:’ messageSignatureFromArguments: #(‘detectBlock’ ‘noneBlock’).
>
> —
> Have a good one; keep it, light.
> Kindly, rabbit . .. … ‘…^,^ 🐇🐇🐇
>
> Sent from Callisto House mobile - Ganymede
> :: decentralized mobile homeless solutions ::
>
> On Thu, Jan 12, 2023 at 13:34, rabbit <rabbit at callistohouse.org> wrote:
>
>> Jeez, I’m totally confused, this morning.
>>
>> Ahh, yes. Here we are. Thanks, Elliot. I’m still unable to see methods added to the methodDict, even with the call to #addSelector: selector withMethod: compiledMethod method notifying: [nil].
>>
>> A comment in String>>#keywords sez ::
>>
>> "Has a final keyword, as in #nextPut::andCR"
>>
>> What is this? Is there some sort of trailing keyword allowed???
>>
>> •••
>>
>> Here’s an extension method I’m now using, called with:
>>
>> methodSignature := ‘detect:ifNone:’ messageSignatureFromArguments: { [:each | each isIt ]. [nil] }.
>>
>> String>>#messageSignatureFromArguments: arguments
>> "Answer an array of the keywords, insterspersed with the argument names, that compose the receiver."
>> | selectorStream |
>> selectorStream := '' writeStream.
>> (self numArgs = 0)
>> ifTrue: [selectorStream nextPutAll: self]
>> ifFalse: [self keywords with: arguments
>> do: [:keyword :argument | selectorStream nextPutAll: keyword, ' ', argument, ' ']].
>> ^ selectorStream contents
>> The allows my method copy block to be:
>>
>> classes do: [:thisClazz |
>> thisClazz methodDictionary keysAndValuesDo: [:selector :method | | arguments compiledMethod |
>> arguments := method tempNames first: method numArgs.
>> compiledMethod := Compiler
>> compile: ((selector messageSignatureFromArguments: arguments),
>> ' ^self redirectMessage: (Message selector: ', selector asSymbol printString,
>> ' arguments: ', '{', ((arguments printElementsOn: '' writeStream) contents), '}).')
>> environment: value class environment notifying: nil trailer: method trailer ifFail: [nil].
>> refClass addSelector: selector withMethod: compiledMethod method notifying: nil]].
>>
>> —
>> Have a good one; keep it, light.
>> Kindly, rabbit . .. … ‘…^,^ 🐇🐇🐇
>>
>> Sent from Callisto House mobile - Ganymede
>> :: decentralized mobile homeless solutions ::
>>
>> On Thu, Jan 12, 2023 at 11:23, Eliot Miranda <eliot.miranda at gmail.com> wrote:
>>
>>> Use selector keywords to get the keywords. This works for unary and binary selectors.
>>>
>>> _,,,^..^,,,_ (phone)
>>>
>>>> On Jan 11, 2023, at 12:21 PM, rabbit <rabbit at callistohouse.org> wrote:
>>>
>>>>  Yes to get the keywords and numArgs I.
>>>>
>>>> keywords := selector subStrings: $:.
>>>>
>>>> —
>>>> Have a good one; keep it, light.
>>>> Kindly, rabbit . .. … ‘…^,^ 🐇🐇🐇
>>>>
>>>> Sent from Callisto House mobile - Ganymede
>>>> :: decentralized mobile homeless solutions ::
>>>>
>>>> On Wed, Jan 11, 2023 at 13:42, Ron Teitelbaum <ron at usmedrec.com> wrote:
>>>>
>>>>> Hi Rob,
>>>>>
>>>>> Do you mean
>>>>>
>>>>> aCompiledMethod selector?
>>>>>
>>>>> All the best,
>>>>>
>>>>> Ron Teitelbaum
>>>>>
>>>>> On Wed, Jan 11, 2023 at 1:18 PM rabbit <rabbit at callistohouse.org> wrote:
>>>>>
>>>>>> Hi y’all,
>>>>>>
>>>>>> Is there a way I could acquire the list of argument names of a CompiledMethod?
>>>>>>
>>>>>> —
>>>>>> Have a good one; keep it, light.
>>>>>> Kindly, rabbit . .. … ‘…^,^ 🐇🐇🐇
>>>>>>
>>>>>> Sent from Callisto House mobile - Ganymede
>>>>>> :: decentralized mobile homeless solutions ::
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20230112/9dcb5daf/attachment.html>