1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-09 18:50:54 +03:00
ski 5747059b21 0026833: Create command checkview containing all viewer types
Created command checkview for displaying shapes.
2016-02-05 11:14:37 +03:00

58 lines
1.3 KiB
Plaintext
Executable File

puts "========"
puts "OCC21292"
puts "========"
puts ""
######################################################
# Shading on large model too long
######################################################
set BugNumber OCC21292
# 1 munite
cpulimit 60
restore [locate_data_file OCC21292.brep] result
vinit
vsetdispmode 1
chrono h reset; chrono h start
#
# DISPLAY OPERATION ----- START
#
vdisplay result
#
# DISPLAY OPERATION ----- FINISH
#
chrono h stop; set CPU_time_List [chrono h show]
set CPU_user_time [lindex ${CPU_time_List} 11]
puts "CPU_user_time=${CPU_user_time}"
checkprops result -s 1.40193e+07
checknbshapes result -vertex 372 -edge 369 -wire 2 -face 1 -shell 0 -solid 0 -compsolid 0 -compound 1 -shape 745
if {[string compare $tcl_platform(platform) "windows"] == 0} {
puts "windows"
set Good_CPU_user_time 0.
} else {
if {[string compare $tcl_platform(os) "SunOS"] == 0} {
puts "SunOS"
set Good_CPU_user_time 6.
} else {
puts "Linux"
set Good_CPU_user_time 6.
}
}
# Check time boolean operation
if {${Good_CPU_user_time} > ${CPU_user_time}} {
puts "OK ${BugNumber} : CPU user time is good"
} else {
puts "Faulty ${BugNumber} : CPU user time is wrong"
}
checkview -screenshot -3d -path ${imagedir}/${test_image}.png