mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-05 18:16:23 +03:00
a8676008f7
Splitting of subgroups bugs/modalg and bugs/moddata to optimise time of testing Correction of end file in group v3d Small correction of test case
21 lines
435 B
Plaintext
Executable File
21 lines
435 B
Plaintext
Executable File
puts "========"
|
|
puts "CR23644"
|
|
puts "========"
|
|
|
|
##########################################
|
|
## Intersection between coaxial cones produces exception
|
|
##########################################
|
|
|
|
pcone cn1 10 0 20
|
|
pcone cn2 20 0 20
|
|
explode cn1 f
|
|
explode cn2 f
|
|
copy cn1_1 f1
|
|
copy cn2_1 f2
|
|
|
|
if [catch {bopcurves f1 f2} BOPLog] {
|
|
if { [regexp "Tolerance Reached=0\n has no 3d curve" ${BOPLog}] != 1 } {
|
|
puts "CR23644: Error"
|
|
}
|
|
}
|