make-context-transparent ( view -- )

Vocabulary

ui.backend.cocoa

Inputs

view

an object

Outputs

None

Definition

USING: alien.c-types alien.data cocoa.messages cocoa.runtime
cocoa.views ;

IN: ui.backend.cocoa

: make-context-transparent ( view -- )
    { id { id SEL } } "openGLContext" send 0 int <ref>
    NSOpenGLCPSurfaceOpacity
    { void { id SEL void* long } } "setValues:forParameter:"
    send ;