(fullscreen?) ( world -- ? )

Vocabulary

ui.backend

Inputs

world

an object

Outputs

?

an object

Definition

IN: ui.backend

HOOK: (fullscreen?) ui-backend ( world -- ? )

Methods

USING: accessors alien.c-types cocoa.messages cocoa.runtime
kernel math ui.backend ui.backend.cocoa ;

M: cocoa-ui-backend (fullscreen?)
    handle>> [
        view>> { char { id SEL } } "isInFullScreenMode" send
        zero? not
    ] [ f ] if* ;


USING: accessors ui.backend ui.backend.gtk2 ;

M: gtk2-ui-backend (fullscreen?) handle>> fullscreen?>> ;