mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-09 18:50:54 +03:00
6d3685029f
Added possibility to define patterns that must be present in the test log, so that test is considered OK only if all these patterns are found. New REQUIRED statement is introduced for that, documented in dox/dev_guides/tests/tests.md. Removed all uses of decho and dlog commands, added REQUIRED where necessary. Command xdistcs is modified to output to Tcl instead of cout, and extended to report errors and warnings if distances are greater than tolerance (directly, instead of complex post-processing on Tcl level). DEBUG mode for TODOs was removed (we should have no deviations in Debug mode). Corrected indentation in DrawResources/TestCommands.tcl HTML log will now highlight TODO statement causing IMPROVEMENT status, or REQUIRED statement causing FAIL, by corresponding color.
33 lines
949 B
Plaintext
Executable File
33 lines
949 B
Plaintext
Executable File
puts "REQUIRED All: Faulty shapes in variables faulty_1 to faulty_"
|
|
puts "========="
|
|
puts " OCC943 "
|
|
puts "(case 1)"
|
|
puts "========="
|
|
puts ""
|
|
#####################################################
|
|
## The regression is intersecting pcurves of face, They are added by fixshape.
|
|
## (To see this you can try fixshape dF.rle from attachment. But please note, that
|
|
## checkshape on result of fixshape sometimes fails and sometimes not. It is
|
|
## instability!)
|
|
######################################################
|
|
|
|
restore [locate_data_file OCC943_1.brep] result
|
|
|
|
set err [checkshape result]
|
|
|
|
set j 1
|
|
repeat 25 {
|
|
restore [locate_data_file OCC943_1.brep] result
|
|
set err1 [checkshape result]
|
|
if { $err != $err1 } {
|
|
puts [format " Faulty OCC943 (case 1): function CHECKSHAPE works wrongly on %s time" $j]
|
|
break
|
|
} else {
|
|
puts [format " OCC943 (case 1) OK: function CHECKSHAPE works properly %s time" $j]
|
|
}
|
|
incr j
|
|
}
|
|
|
|
set 2dviewer 0
|
|
|