define-protocol ( protocol wordlist -- )
Factor handbook » The language » Objects » Delegation

Prev:	PROTOCOL:
Next:	SLOT-PROTOCOL:

Vocabulary
delegate

Inputs

protocol	a word for the new protocol
wordlist	a sequence of words

Outputs
None

Word description
Defines a symbol as a protocol.

Notes
Usually, PROTOCOL: should be used instead. This is only for runtime use.

See also
PROTOCOL:

Definition

USING: delegate.private kernel sequences words.symbol ;

IN: delegate

: define-protocol ( protocol wordlist -- )
    dup [ check-generic ] each
    [ drop define-symbol ] [
        fill-in-depth
        [ forget-old-definitions ] [ add-new-definitions ]
        [ initialize-protocol-props ] 2tri
    ] 2bi ;