]> gitweb.factorcode.org Git - factor.git/blob - extra/hello-ui/hello-ui.factor
3843eec091301d8b9b49f5cb73461d7248c8bfcf
[factor.git] / extra / hello-ui / hello-ui.factor
1 USING: ui ui.gadgets.labels ;
2 IN: hello-ui
3
4 : hello ( -- )
5     [ "Hello world" <label> "Hi" open-window ] with-ui ;
6
7 MAIN: hello