I made a little mistake in the code posted above… but seems like the forum won’t let me edit my post. The rewrite block should read:
rewriter:=
[:inputList |
| result |
result := OrderedCollection new.
inputList do: [:message |
| stem argCount |
stem := (‘osc_’&(message copyFrom: 2 to: message size) copyReplaceAll: #($/) with: #($_)).
argCount := message occurrencesOf: $f.
(argCount > 0) ifTrue: [
(1 to: argCount) do: [:n | |
arg |
arg := (stem copyUpTo: $ )&’__’&n.
result add: (arg asHotValue).
]
] ifFalse: [ result add: (stem asHotValue).]
].
result
].