demos ( -- )

Vocabulary

demos

Inputs

None

Outputs

None

Definition

USING: accessors kernel ui ui.gadgets.borders
ui.gadgets.scrollers ui.gadgets.worlds ;

IN: demos

: demos ( -- )
    [
        f
        T{ world-attributes { title "Demos" } }
        clone
        <demo-runner>
        { 2 2 }
        <border>
        <scroller>
        >>gadgets
        open-window
    ] with-ui ;