809eca9d |
1 | puts "===========" |
2 | puts "OCC22986" |
3 | puts "===========" |
4 | puts "" |
5 | ####################################################################### |
6 | # Regression with OCCT652 on Windows. DRAWEXE craches during featprism |
7 | ####################################################################### |
8 | |
9 | set BugNumber OCC22986 |
10 | |
11 | #eval datadir ${CfeDir}/data/900 |
12 | |
13 | restore [locate_data_file CFE900_cts21gbs.rle] base |
14 | restore [locate_data_file cts21322_face.rle] wire |
15 | |
16 | explode base face |
17 | copy base_6 fsketch |
18 | |
19 | splitshape result fsketch fsketch wire |
20 | if { [llength [explode result f]] != 3 } { |
21 | puts "Faulty ${BugNumber} : The result of splitshape command is incorrect." |
22 | } else { |
23 | puts "${BugNumber} OK" |
24 | } |
25 | |
26 | set square 414 |
27 | set 3dviewer 0 |