tests/bugs/vis/bug25060

   1 puts "============"
   2 puts "CR25060"
   3 puts "============"
   4 puts ""
   5 #######################################################################
   6 #  Capping breaks highlighting of shaded AIS_Shape with displayed edges.
   7 #######################################################################
   8 vinit View1
   9 box b 10 10 10
  10 vdisplay b
  11 vshowfaceboundary b 1
  12 vclipplane create pln1
  13 vclipplane set pln1 object b
  14 vclipplane change pln1 equation 0 1 0 -5
  15 vclipplane change pln1 capping on
  16 vsetdispmode 1
  17 vfit
  18 vmoveto 304 146
  19
  20 set x_coord 304
  21 set y_coord 146
  22 checkcolor $x_coord $y_coord 0 1 1
  23 if { $stat != 1 } {
  24    puts "Error : Highlighting is broken."
  25 }
  26
  27 checkview -screenshot -3d -path ${imagedir}/${test_image}.png