Merge branch 'master' of git://factorcode.org/git/factor
[factor/jcg.git] / extra / hello-ui / hello-ui.factor
blob3843eec091301d8b9b49f5cb73461d7248c8bfcf
1 USING: ui ui.gadgets.labels ;
2 IN: hello-ui
4 : hello ( -- )
5     [ "Hello world" <label> "Hi" open-window ] with-ui ;
7 MAIN: hello