init-method ( method -- sel imp types )

Vocabulary

cocoa.subclassing

Inputs

method

an object

Outputs

sel	an object
imp	an object
types	an object

Definition

USING: alien.strings cocoa.runtime combinators io.encodings.utf8
kernel sequences ;

IN: cocoa.subclassing

: init-method ( method -- sel imp types )
    first3 swap
    [ sel_registerName ] [ ( -- xt ) execute-effect ]
    [ utf8 string>alien ] tri* ;