#!./mofeperl

&wafe_cmd(<<'__');
mergeResources topLevel \
        *background gray80

XmRowColumn rc topLevel
XmToggleButton toggle1 rc labelString "toggle me"
XmToggleButton toggle2 rc labelString "me too"
XmPushButton b rc labelString Quit activateCallback quit

realize
__

# calling the xt event loop
&wafe_process_events();



