class-for-style ( style -- NSWindow/NSPanel )

Vocabulary

cocoa.windows

Inputs

style

an object

Outputs

NSWindow/NSPanel

an object

Definition

USING: cocoa.classes kernel math ;

IN: cocoa.windows

: class-for-style ( style -- NSWindow/NSPanel )
    7920 bitand zero? NSWindow NSPanel ? ;