0025568: SIGSEGV in thrusections with edge without 3D curve
[occt.git] / tests / bugs / modalg_5 / bug25568
1 puts "============"
2 puts "OCC25568"
3 puts "============"
4 puts ""
5 #########################################################################
6 # SIGSEGV in thrusections with edge without 3D curve
7 #########################################################################
8
9 restore [locate_data_file bug25568_loft-inv1-draw-Loft-00-section.brep] Loft-00-section
10 restore [locate_data_file bug25568_loft-inv1-draw-Loft-01-section.brep] Loft-01-section
11
12 if [info exists result] {unset result}
13
14 thrusections result 0 0 Loft-00-section Loft-01-section
15
16 if ![isdraw result] {
17   if {[info commands fixshape] == ""} {pload XSDRAW}
18   fixshape Loft-00-section_fixed Loft-00-section
19   thrusections result 0 0 Loft-00-section_fixed Loft-01-section
20   if ![isdraw result] {
21     puts "Error : thrusection is failed even after fixing arguments"
22   }
23 }
24
25 set square 25.236
26 set 2dviewer 0