enter-fullscreen ( world -- )

Vocabulary

ui.backend.cocoa

Inputs

world

an object

Outputs

None

Definition

USING: accessors alien.c-types cocoa.classes cocoa.messages
cocoa.runtime kernel ;

IN: ui.backend.cocoa

: enter-fullscreen ( world -- )
    handle>> view>> NSScreen { id { id SEL } } "mainScreen" send
    f
    { char { id SEL id id } } "enterFullScreenMode:withOptions:"
    send drop ;