0029528: Visualization, TKOpenGl - allow defining sRGB textures

[occt.git] / tests / bugs / moddata_2 / bug935_1

puts "REQUIRED All: Faulty shapes in variables faulty_1 to faulty_"
puts "========="
puts " OCC935 "
puts "(case 1)"
puts "========="
puts ""
###############################
## instability in checkshape in KAS:dev version.
###############################

restore [locate_data_file OCC935_1.brep] result

set err [checkshape result]

set j 1
repeat 25 {
    restore [locate_data_file OCC935_1.brep] result
    set err1 [checkshape result]
    if { $err != $err1 } {
      puts [format " Faulty OCC935 (case 1): function CHECKSHAPE works wrongly on %s time" $j]
      break
    } else {
      puts [format " OCC935 (case 1)  OK: function CHECKSHAPE works properly %s time" $j]
    }
    incr j
}

checkview -display result -2d -path ${imagedir}/${test_image}.png