mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
27 lines
502 B
Plaintext
Executable File
27 lines
502 B
Plaintext
Executable File
puts "========="
|
|
puts " OCC503 "
|
|
puts "========="
|
|
puts ""
|
|
###############################
|
|
## Draw hangs up during sprops operation
|
|
###############################
|
|
|
|
#cpulimit 9000
|
|
|
|
restore [locate_data_file OCC503.brep] result
|
|
|
|
if [catch {sprops result 0.001 } catch_result] {
|
|
set mistake 1
|
|
} else {
|
|
set mistake 0
|
|
}
|
|
|
|
if { $mistake != 0} {
|
|
puts "Faulty OCC503 : Draw hangs up during sprops operation "
|
|
} else {
|
|
puts "OCC503 OK: function SPROPS works without hangs up "
|
|
}
|
|
|
|
set 2dviewer 0
|
|
|