mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-09 18:50:54 +03:00
85c44a05a0
Modified QAcommands OCC23952sweep and OCC23952intersect to prevent exception in appropriate test cases
22 lines
675 B
Plaintext
22 lines
675 B
Plaintext
puts "================"
|
|
puts "OCC23952"
|
|
puts "================"
|
|
puts ""
|
|
###########################################################################################
|
|
# Improving thread-safety of intersections, approximations and other modeling algorithms
|
|
###########################################################################################
|
|
|
|
pload QAcommands
|
|
restore [locate_data_file bug23952_s1.draw] a
|
|
restore [locate_data_file bug23952_s2.draw] b
|
|
|
|
set NbLines 5
|
|
set info [OCC23952intersect $NbLines a b]
|
|
|
|
if { [regexp "theNbSol: OK" $info] != 1 } {
|
|
puts "Error : Number of intersections is incorrect"
|
|
} else {
|
|
puts "OK: Number of intersections is correct"
|
|
}
|
|
|