mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-10 18:51:21 +03:00
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.
31 lines
868 B
Plaintext
Executable File
31 lines
868 B
Plaintext
Executable File
puts "========="
|
|
puts "CR26038"
|
|
puts "========="
|
|
puts ""
|
|
###############################
|
|
## Wrong result done by extrema for the circle and plane
|
|
###############################
|
|
|
|
restore [locate_data_file bug26038_f.brep] f
|
|
restore [locate_data_file bug26038_e.brep] e
|
|
|
|
mksurface s f
|
|
mkcurve c e
|
|
|
|
extrema c s
|
|
regexp {The length ext_1 is +([-0-9.+eE]+)} [length ext_1] full ext_1_length
|
|
set good_length 1.0e-7
|
|
set tol_abs 1.0e-6
|
|
set tol_rel 1.0e-6
|
|
checkreal "length of ext_1" ${ext_1_length} ${good_length} ${tol_abs} ${tol_rel}
|
|
|
|
trim ct c 3.0050016686511065 3.2781836385284797
|
|
extrema ct s
|
|
regexp {The length ext_1 is +([-0-9.+eE]+)} [length ext_1] full ext_1_length
|
|
set good_length 1.0e-7
|
|
set tol_abs 1.0e-6
|
|
set tol_rel 1.0e-6
|
|
checkreal "length of ext_1" ${ext_1_length} ${good_length} ${tol_abs} ${tol_rel}
|
|
|
|
xdistcs c s 3.140212946671221 3.142972360508366 10 1e-6
|