tests/bugs/vis/bug22368

   1 puts "========================"
   2 puts "OCC22368"
   3 puts "========================"
   4 puts ""
   5 #######################################################################
   6 # AIS_Trihedron's highlight presentation isn't updated on trihedron relocation
   7 #######################################################################
   8
   9 set BugNumber OCC22368
  10
  11 vclear
  12 vinit View1
  13 vtrihedron trihedron
  14 OCC74_set trihedron 3
  15
  16 set x1 200
  17 set x2 220
  18 set x3 210
  19
  20 set y 190
  21
  22 vselect ${x3} ${y}
  23
  24 vsetlocation trihedron 100 100 100
  25
  26 set status 0
  27 for {set i ${x1} } {$i <= ${x2} } {incr i} {
  28     checkcolor ${i} ${y} 0 0 0
  29 }
  30
  31 checkview -screenshot -3d -path ${imagedir}/${test_image}.png