mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-09 18:50:54 +03:00
6728599615
Parameterization speed is taken into account to avoid ProjLib projector usage in case of bad input data. Test case is added. Test cases correction.
29 lines
681 B
Plaintext
29 lines
681 B
Plaintext
puts "============"
|
|
puts "OCC27569"
|
|
puts "============"
|
|
puts ""
|
|
######################################################
|
|
# [Regression in 6.9.0] Projecting a curve hangs
|
|
######################################################
|
|
|
|
pload QAcommands
|
|
|
|
restore [locate_data_file bug27569.brep] aS
|
|
explode aS
|
|
mkcurve c aS_1
|
|
mksurface s aS_2
|
|
|
|
# Performance check
|
|
chrono h reset; chrono h start
|
|
OCC24008 c s;
|
|
chrono h stop; set q [dchrono h show]
|
|
regexp {CPU user time: ([-0-9.+eE]+) seconds} $q full aTime
|
|
|
|
set MAX_TIME 1.0
|
|
|
|
if { $aTime > ${MAX_TIME} } {
|
|
puts "Elapsed time is more than ${MAX_TIME} seconds - Faulty"
|
|
} else {
|
|
puts "Elapsed time is less than ${MAX_TIME} seconds - OK"
|
|
}
|