[slot-setter] ( mirror -- quot )


Vocabulary
irc.messages.base.private

Inputs
mirroran object


Outputs
quotan object


Definition
USING: assocs kernel ;

IN: irc.messages.base.private

: [slot-setter] ( mirror -- quot )
[ set-at ] curry [ [ drop ] if* ] curry ; inline