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
36 lines
797 B
Plaintext
Executable File
36 lines
797 B
Plaintext
Executable File
puts "================"
|
|
puts "OCC25"
|
|
puts "================"
|
|
puts ""
|
|
|
|
restore [locate_data_file OCC25-1.brep] sh1
|
|
|
|
decho off
|
|
set che [checkshape sh1]
|
|
decho on
|
|
|
|
if { [regexp {Faulty} $che ] == 1 } {
|
|
puts "Faulty OCC25 (case 1): Checkshape says that the wire on face has bad orientation, but it is not truth"
|
|
} else {
|
|
puts "OCC25 OK (case 1): Checkshape works properly"
|
|
}
|
|
|
|
# ================================================
|
|
restore [locate_data_file OCC25-2.brep] sh2
|
|
|
|
decho off
|
|
set che [checkshape sh2]
|
|
decho on
|
|
|
|
if { [regexp {BRepCheck_BadOrientationOfSubshape} $che] && [regexp {BRepCheck_UnorientableShape} $che]} {
|
|
puts " OCC25 (case 2) OK: Checkshape works properly"
|
|
} else {
|
|
puts "Faulty OCC25 (case 2): Checkshape works wrongly"
|
|
}
|
|
|
|
compound sh1 sh2 result
|
|
|
|
set 2dviewer 0
|
|
|
|
|