# Check
set info [dchrono h show]
regexp {CPU user time: ([-0-9.+eE]+) seconds} $info full cpu_time
-if { $cpu_time > 50 } {
+if { $cpu_time > 100 } {
puts "Error: performance saving document D is too low"
} else {
puts "OK: performance saving document D is high"
# 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 *
set info [dchrono h show]
regexp {CPU user time: ([-0-9.+eE]+) seconds} $info full cpu_time
-if { $cpu_time > 300 } {
+if { $cpu_time > $cpu_check } {
puts "Error: performance of import of data is low"
} else {
puts "OK: performance of import of data is high"