mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-08-01 11:34:54 +08:00
aml
ea3b6e72be
Changed computation of point projection to more correct. Calculation periodicity information added to cache. Test case for issue CR26339 Small correction of test case for issue CR26339
41 lines
961 B
Plaintext
41 lines
961 B
Plaintext
puts "============"
|
|
puts "OCC26339"
|
|
puts "============"
|
|
puts ""
|
|
#######################################################################
|
|
# [Regression in 6.9.0] Projecting a curve hangs
|
|
#######################################################################
|
|
|
|
if { [regexp {Debug mode} [dversion]] } {
|
|
if { [regexp {Windows} [dversion]] } {
|
|
set max_time 10
|
|
} else {
|
|
set max_time 10
|
|
}
|
|
} else {
|
|
if { [regexp {Windows} [dversion]] } {
|
|
set max_time 3
|
|
} else {
|
|
set max_time 3
|
|
}
|
|
}
|
|
|
|
restore [locate_data_file bug26339_a_1886.brep] f
|
|
|
|
dchrono h reset
|
|
dchrono h start
|
|
|
|
fixshape r f 1e-5
|
|
|
|
dchrono h stop
|
|
set q [dchrono h show]
|
|
|
|
regexp {CPU user time: ([-0-9.+eE]+) seconds} $q full z
|
|
puts "$z"
|
|
|
|
if { $z > ${max_time} } {
|
|
puts "Elapsed time of projecting a curve is more than ${max_time} seconds - Faulty"
|
|
} else {
|
|
puts "Elapsed time of projecting a curve is less than ${max_time} seconds - OK"
|
|
}
|