mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-04 18:06:22 +03:00
29 lines
677 B
Plaintext
Executable File
29 lines
677 B
Plaintext
Executable File
puts "============"
|
|
puts "OCC5157"
|
|
puts "============"
|
|
puts ""
|
|
######################################################
|
|
# DRAW commands vprops and sprops with tolerance 1.e-6 hange on attached shape.
|
|
######################################################
|
|
|
|
cpulimit 3500
|
|
#dchrono h reset; dchrono h start
|
|
|
|
catch { pload XDE }
|
|
|
|
set BugNumber OCC5157
|
|
|
|
set status 0
|
|
set filepath [locate_data_file OCC5157.stp]
|
|
if {[catch { stepread $filepath a * } catch_result] } {
|
|
puts "Faulty ${BugNumber} : here is reading problem"
|
|
} else {
|
|
tpcompound result
|
|
}
|
|
|
|
checkprops result -s 35273.9 -eps 1.e-6
|
|
checkshape result
|
|
checkview -display result -2d -path ${imagedir}/${test_image}.png
|
|
|
|
|