tests/bugs/demo/bug23410

   1 puts "============"
   2 puts "CR23410"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 # QA comamnds don't work properly in new testing system
   7 #######################################################################
   8 pload QAcommands
   9
  10 set x_coord 128
  11 set y_coord 235
  12
  13 box result 100 100 100
  14 vdisplay result
  15 vsetdispmode 1
  16 vfit
  17 vsetcolor result GREEN
  18
  19 checkcolor $x_coord $y_coord 0.00 0.83 0.00
  20 checkview -display result -3d -path ${imagedir}/${test_image}.png