<participant> ( name -- participant )

Vocabulary

irc.client.participants

Inputs

name

an object

Outputs

participant

an object

Definition

USING: combinators kernel splitting ;

IN: irc.client.participants

: <participant> ( name -- participant )
    {
        { [ "@" ?head ] [ t f ] }
        { [ "+" ?head ] [ f t ] }
        [ f f ]
    } cond participant boa ;