mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-05 18:16:23 +03:00
22 lines
571 B
Plaintext
Executable File
22 lines
571 B
Plaintext
Executable File
puts "============"
|
|
puts "OCC24220"
|
|
puts "============"
|
|
puts ""
|
|
######################################################
|
|
# bopargcheck returns valid for C0 shape but results of boolean operations are broken with such shapes
|
|
######################################################
|
|
|
|
restore [locate_data_file bug24220_A.brep] result
|
|
|
|
decho off
|
|
set info [bopargcheck result]
|
|
decho on
|
|
|
|
if { [regexp "Faulties, that can not be treated by BOP, are detected" ${info}] != 1 } {
|
|
puts "Error : message is not correct"
|
|
} else {
|
|
puts "OK : message is correct"
|
|
}
|
|
|
|
set 3dviewer 1
|