USING: kernel ui.gadgets ui ui.render prettyprint ;
IN: gfx

TUPLE: my-gadget < gadget ;
M: my-gadget draw-gadget*  . "Hello World" . ;
: <my-gadget> ( -- gadget ) <gadget> ;
: run ( -- ) <my-gadget> "hello world" open-window ;