1puts "============"
2puts "OCC23175"
3puts "============"
4puts ""
5####################################################################################
6# Failed to segment a periodic B-Spline when parameter coincides with existing knot
7####################################################################################
8
9set BugNumber OCC23175
10
11restore [locate_data_file OCC23175-bspline-per-3_draw] result
12
13catch { segment result 1 2.5 } msg
14
15set exception_status 0
16set index [lsearch $msg exception]
17if {$index > -1} {
18    set exception_status 1
19}
20
21if { ${exception_status} != 0 } {
22    puts "Faulty ${BugNumber}"
23} else {
24    puts "OK ${BugNumber}"
25}
26
27checkview -display result -2d -path ${imagedir}/${test_image}.png
28
29
30