mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
352ffd7358
Test case tests/bugs/modalg/dxf906 was renamed to bug889 Adding test cases to tests/bugs/moddata Modified expressions puts [checkshape result]. Added command vzfit in end file in folder bugs. Unlocked command coordload in QABugs_3.cxx Modified test case bugs vis buc60738 Added test cases to modalg and moddata Added test cases to caf and fclasses Added test cases to group heal
37 lines
975 B
Plaintext
Executable File
37 lines
975 B
Plaintext
Executable File
puts "======="
|
|
puts "OCC22"
|
|
puts "======="
|
|
puts ""
|
|
#####################################################################
|
|
##Locations are not correctly processed by ShapeBuild_ReShape (and base class BRepTools_ReShape)
|
|
#####################################################################
|
|
|
|
pload QAcommands
|
|
|
|
restore [locate_data_file OCC21.brep] shape
|
|
explode shape f
|
|
compound shape_1 shape_2 compoundToBeDivided
|
|
|
|
# Case A of the bug is reproduced. Resulting shape must have 5 faces instead of 3
|
|
|
|
if [catch { OCC22 result shape compoundToBeDivided 0 } ] {
|
|
puts "OCC22 ERROR; (case 1)"
|
|
} else {
|
|
puts "OCC22 OK; (case 1)"
|
|
}
|
|
|
|
regexp {([-0-9.+eE]+)\s FACE} [statshape result] full nbFaces
|
|
if {$nbFaces != 5} {
|
|
puts "OCC22 FAULTY: Initial shape was not splitted"
|
|
}
|
|
|
|
# Case B of the bug is reproduced. Result must be valid
|
|
if [catch { OCC22 res shape compoundToBeDivided 1 } ] {
|
|
puts "OCC22 ERROR; (case 2)"
|
|
} else {
|
|
puts "OCC22 OK; (case 2)"
|
|
}
|
|
|
|
set 2dviewer 0
|
|
|