mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
Possibility to read shapes and OCAF documents from old persistence format (Std and StdL schema) is restored. Test cases used old persistent files on input are restored with suffix "_std" Removing toolkit from OS package
35 lines
1.4 KiB
Plaintext
35 lines
1.4 KiB
Plaintext
|
|
puts "===== OCC1454 ====="
|
|
#######################################################################################
|
|
# Improve performance of TDF_Label::FindChild
|
|
#######################################################################################
|
|
|
|
puts "Info: Open the document with 80000 sublabels of the label 0:2"
|
|
dchrono h reset
|
|
dchrono h start
|
|
Open [locate_data_file OCC1726.std] D
|
|
dchrono h stop
|
|
set TimeList [dchrono h show]
|
|
|
|
regexp {Elapsed time: [-0-9.+eE]+ Hours ([-0-9.+eE]+) Minutes ([-0-9.+eE]+) Seconds} $TimeList full ElapsedTime_min ElapsedTime_sec
|
|
regexp {CPU user time: ([-0-9.+eE]+) seconds} $TimeList full CPUusertime
|
|
regexp {CPU system time: ([-0-9.+eE]+) seconds} $TimeList full CPUsystemtime
|
|
|
|
puts "ElapsedTime = ${ElapsedTime_min} min ${ElapsedTime_sec} sec CPUusertime = ${CPUusertime} CPUsystemtime = ${CPUsystemtime}"
|
|
|
|
if { ${ElapsedTime_sec} > 20.0 || ${ElapsedTime_min} != 0 } {
|
|
puts "Elapsed time is more then 20.0 seconds - Faulty"
|
|
puts "Faulty OCC1454"
|
|
} elseif { ${CPUusertime} > 12 } {
|
|
puts "CPUusertime is more then 12 seconds - Faulty"
|
|
puts "Faulty OCC1454"
|
|
} elseif { ${CPUsystemtime} > 0.6 } {
|
|
puts "CPUsystemtime is more then 0.6 seconds"
|
|
puts "Faulty OCC1454"
|
|
} else {
|
|
puts "Elapsed time is less then 20 seconds - OK"
|
|
puts "CPU user time is less then 12 seconds - OK"
|
|
puts "CPU system time is less then 0.6 seconds - OK"
|
|
puts "OK for OCC1454"
|
|
}
|