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