mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-11 01:58:22 +08:00
34 lines
685 B
Plaintext
34 lines
685 B
Plaintext
puts "=========="
|
|
puts "OCC24024"
|
|
puts "=========="
|
|
puts ""
|
|
######################################
|
|
# Slow import of specific STEP data
|
|
######################################
|
|
|
|
cpulimit 1700
|
|
set ver [dversion]
|
|
if { [regexp "Debug" $ver] != 1 } {
|
|
set cpu_check 450
|
|
} else {
|
|
set cpu_check 1600
|
|
}
|
|
|
|
dchrono h reset
|
|
dchrono h start
|
|
stepread [locate_data_file bug24024_slow_import.stp] a *
|
|
dchrono h stop
|
|
|
|
tpcompound result
|
|
|
|
set info [dchrono h show]
|
|
regexp {CPU user time: ([-0-9.+eE]+) seconds} $info full cpu_time
|
|
if { $cpu_time > $cpu_check } {
|
|
puts "Error: performance of import of data is low"
|
|
} else {
|
|
puts "OK: performance of import of data is high"
|
|
}
|
|
|
|
set 2dviewer 1
|
|
|