selector ( selector -- alien )

Vocabulary

cocoa.messages

Inputs

selector

an object

Outputs

alien

an object

Definition

USING: accessors alien cocoa.runtime kernel ;

IN: cocoa.messages

: selector ( selector -- alien )
    dup object>> expired?
    [ dup name>> sel_registerName [ >>object drop ] keep ]
    [ object>> ] if ;