webkit-demo ( -- )

Vocabulary

webkit-demo

Inputs

None

Outputs

None

Definition

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

IN: webkit-demo

: webkit-demo ( -- )
    <WebWindow>
    [ { void { id SEL } } "center" send ]
    [ f { void { id SEL id } } "makeKeyAndOrderFront:" send ]
    [ "https://factorcode.org" load-url ] tri ;