\( Graphical Hello \) make main window: win =: new GTK window \ currently only top-level win::set title "Hello GTK" win::set size 200, 100 win::connect 'destroy' to `GTK main quit` win::add widget (new GTK widget label "Hello!") :>win main (args):+ GTK init args win =: make main window win::show all GTK main win \+ stdlib \+ ./TAVPL_gtk.tavh