0023905: Clean obsolete test commands
[occt.git] / tests / bugs / moddata_1 / bug54
1 if { [array get env os_type] != "" } {
2     set os $env(os_type)
3 }
4 puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_"
5 puts "================"
6 puts "OCC54"
7 puts "================"
8 puts ""
9 ####################################################
10 ## Exception is raised during command "small" in DRAW on attached shape.
11 ####################################################
12
13 cpulimit 500
14 restore [locate_data_file OCC54.brep] result
15
16 checkshape result
17
18 set 3dviewer 0