mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
26 lines
632 B
Plaintext
26 lines
632 B
Plaintext
puts "========"
|
|
puts "OCC26914"
|
|
puts "========"
|
|
puts ""
|
|
#################################
|
|
# Hang in surface approximation
|
|
#################################
|
|
|
|
set max_time 2
|
|
|
|
restore [locate_data_file bug23943_s.draw] s
|
|
|
|
dchrono cr reset
|
|
dchrono cr start
|
|
approxsurf rs s 5e-5 0 0 15 15 100 0
|
|
|
|
dchrono cr stop
|
|
|
|
set chrono_info [dchrono cr show]
|
|
regexp {CPU user time: ([-0-9.+eE]+) seconds} $chrono_info full CPU_time
|
|
if { $CPU_time > ${max_time} } {
|
|
puts "Elapsed time of surface approximation is more than ${max_time} seconds - Error"
|
|
} else {
|
|
puts "Elapsed time of surface approximation is less than ${max_time} seconds - OK"
|
|
}
|