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
|
puts "============"
puts "OCC25568"
puts "============"
puts ""
#########################################################################
# SIGSEGV in thrusections with edge without 3D curve
#########################################################################
restore [locate_data_file bug25568_loft-inv1-draw-Loft-00-section.brep] Loft-00-section
restore [locate_data_file bug25568_loft-inv1-draw-Loft-01-section.brep] Loft-01-section
if [info exists result] {unset result}
thrusections result 0 0 Loft-00-section Loft-01-section
if ![isdraw result] {
if {[info commands fixshape] == ""} {pload XSDRAW}
fixshape Loft-00-section_fixed Loft-00-section
thrusections result 0 0 Loft-00-section_fixed Loft-01-section
if ![isdraw result] {
puts "Error : thrusection is failed even after fixing arguments"
}
}
set square 25.236
set 2dviewer 0
|
