Adjusting testing cases for current state of OCCT
[occt.git] / tests / bugs / moddata / bug503
1 puts "========="
2 puts " OCC503 "
3 puts "========="
4 puts ""
5 ###############################
6 ## Draw hangs up during sprops operation
7 ###############################
8
9 #cpulimit 9000
10
11 restore [locate_data_file OCC503.brep] result
12 if [catch {sprops result} catch_result] {
13     set mistake 1
14 } else {
15     set mistake 0
16 }
17
18 if { $mistake != 0} {
19     puts "Faulty OCC503 : Draw hangs up during sprops operation "
20 } else {
21     puts "OCC503 OK: function SPROPS works without hangs up "
22 }
23
24 set 2dviewer 0
25