1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
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
|
