close-window ( gadget -- )
Factor handbook » UI framework » Developing UI backends » UI backend window management

Prev:

flush-gl-context ( handle -- )

Vocabulary
ui

Inputs

gadget

a gadget

Outputs
None

Word description
Close the native window containing gadget.

Definition

USING: ui.backend ;

IN: ui

HOOK: close-window ui-backend ( gadget -- )

Methods

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

M: cocoa-ui-backend close-window
    find-world [
        handle>>
        [ window>> { void { id SEL } } "close" send ] when*
    ] when* ;


USING: kernel ui ui.gadgets.private ui.gadgets.worlds ;

M: object close-window find-world [ ungraft ] when* ;