tests/bugs/vis/bug26163

   1 puts "============"
   2 puts "CR26163"
   3 puts "============"
   4 puts ""
   5
   6 ##########################################################################################
   7 puts "Visualization - AIS_Shape::SetWidth() should not overwrite the free boundary color"
   8 ##########################################################################################
   9
  10 set check_x 252
  11 set check_y 170
  12
  13 pload VISUALIZATION MODELING
  14
  15 vinit View1 w=400 h=400
  16 vclear
  17 vaxo
  18
  19 restore [locate_data_file bug26163.brep] s
  20 vdisplay s
  21 vfit
  22 vsetwidth s 4
  23
  24 # check that free boundary color is kept
  25 if { [checkcolor $check_x $check_y 0.0 1.0 0.0] != 1 } {
  26   puts "Error: free boundary aspect unexpectedly changed."
  27 }
  28
  29 vdump ${imagedir}/${casename}.png