add-protocol ( class protocol -- )

Vocabulary

cocoa.subclassing

Inputs

class	an object
protocol	an object

Outputs

None

Definition

USING: cocoa.runtime ;

IN: cocoa.subclassing

: add-protocol ( class protocol -- )
    class_addProtocol "add protocol to class" throw-if-false ;