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