# test Dimension to String
xtAppInitialize -class Program

xmLabel .label managed
.label getValues -width w -height h
puts stdout "Width: $w, height: $h"


. realizeWidget

. mainLoop
