# test Boolean to string converter
xtAppInitialize -class Program

xmLabel .label managed
.label setValues -recomputeSize False
.label getValues -recomputeSize x
puts "should be false, is: $x"
.label setValues -recomputeSize True
.label getValues -recomputeSize x
puts "should be true, is: $x"

. realizeWidget

. mainLoop
