0026308: Segmentation fault in BSplCLib::LocateParameter
[occt.git] / tests / bugs / modalg_6 / bug26308
1 puts "========"
2 puts "OCC26308"
3 puts "========"
4 puts ""
5 ###################################################
6 # Segmentation fault in BSplCLib::LocateParameter
7 ###################################################
8
9 #Exception is thrown when computing a value of B-spline
10 #surfaces in point, which is outside of its domain.
11
12 pload XDE
13
14 ReadStep D_First [locate_data_file OCC26308-Face.stp]
15 XGetOneShape rr D_First
16 explode rr f
17 mksurface ss rr_1
18
19 svalue ss -1.427997381773311e+018 4.512451574816904e+016 xx yy zz
20
21 set bug_info_x [dump xx]
22 set bug_info_y [dump yy]
23 set bug_info_z [dump zz]
24
25 set bug_info_x [string trim [string range $bug_info_x [expr {[string last "\n" $bug_info_x] + 1}] [expr {[string length $bug_info_x] - 1}]]]
26 set bug_info_y [string trim [string range $bug_info_y [expr {[string last "\n" $bug_info_y] + 1}] [expr {[string length $bug_info_y] - 1}]]]
27 set bug_info_z [string trim [string range $bug_info_z [expr {[string last "\n" $bug_info_z] + 1}] [expr {[string length $bug_info_z] - 1}]]]
28
29 if {$bug_info_x != -5.42659125962715e+207} {
30   puts "ERROR: OCC26308 is reproduced. X value is incorrect."
31 }
32
33 if {$bug_info_y != 2.90803974424011e+209} {
34   puts "ERROR: OCC26308 is reproduced. Y value is incorrect."
35 }
36
37 if {$bug_info_z != -3.1731154470359e+207} {
38   puts "ERROR: OCC26308 is reproduced. Z value is incorrect."
39 }