# simple pushButton test
xtAppInitialize -class pv+
# \
#  -fallbackResources {
#    {*foreground: red}
#    {Program*fred**labelString: hi there}
#  }

xmMainWindow .main

set base_ .main.r
xmRowColumn $base_ managed
xmLabel $base_.label managed
xmText $base_.text managed

.main manageChild

. realizeWidget
. mainLoop
