# simple pushButton test

xtAppInitialize -class Program

xmPushButton .fred managed

. getValues -argv v -argc c
puts stdout "$c $v"

. realizeWidget

. setCommand

. mainLoop
