mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
92a206a3dd
Correct handling of infinity solutions added for Curve / Curve case. Unused code deleted. Test cases updated to the new behavior.
19 lines
686 B
Plaintext
19 lines
686 B
Plaintext
puts "========"
|
|
puts "OCC26075"
|
|
puts "========"
|
|
puts ""
|
|
###########################################################################
|
|
# Make Extrema_GenExtCC return IsParallel flag in case of parallel curves
|
|
###########################################################################
|
|
|
|
restore [locate_data_file dist1-s1.brep] s1
|
|
restore [locate_data_file dist1-s2.brep] s2
|
|
mkcurve c1 s1
|
|
mkcurve c2 s2
|
|
set bug_info [extrema c1 c2]
|
|
|
|
set bug_info [string range $bug_info [expr {[string first "Infinite" $bug_info]}] [expr {[string first "distance" $bug_info] - 3}]]
|
|
if {$bug_info != "Infinite number of extremas"} {
|
|
puts "ERROR: OCC26075 is reproduced. Flag IsParallel is not returned."
|
|
}
|