mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-07-20 14:19:53 +08:00
- Added function checkprops, set default tolerance parameter to 1.0e-4 - Using "area" instead of "square". - Options "-equal\notequal" isn't used together with "-s" in blend and offset test cases. - Correct regressions/differences/improvements and CPU problem (set props tolerance to 0.1) - Corrected test cases to use checkprops proc. - Correct image difference - Updated TODOs in test cases. - Updated test cases to get correct images of result shape
32 lines
864 B
Plaintext
32 lines
864 B
Plaintext
puts "============"
|
|
puts "OCC6283"
|
|
puts "============"
|
|
puts ""
|
|
######################################################
|
|
# Unstable work fixshape on attached shape (different number of warnings)
|
|
######################################################
|
|
|
|
set BugNumber OCC6283
|
|
|
|
set list [stepread [locate_data_file wgehaeuse_surface.stp] a *]
|
|
|
|
if {[lsearch ${list} Error] > -1} {
|
|
puts "${BugNumber} : Error during reading attached IGES file"
|
|
} else {
|
|
tpcompound comp
|
|
if [catch { set fixlist [fixshape result comp 1e-7] } res] {
|
|
puts "${BugNumber}: Error during fixshape"
|
|
} else {
|
|
set index [string first "Segments were disordered; fixed\n" ${fixlist}]
|
|
if {$index != -1} {
|
|
puts "Faulty ${BugNumber}"
|
|
} else {
|
|
puts "OK ${BugNumber}"
|
|
}
|
|
checkprops result -s 2.22665e+06
|
|
checkshape result
|
|
set 2dviewer 0
|
|
}
|
|
}
|
|
|