mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
ff205346c9
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
40 lines
932 B
Plaintext
40 lines
932 B
Plaintext
puts "================"
|
|
puts "OCC5023"
|
|
puts "================"
|
|
puts ""
|
|
######################################################
|
|
# Performance regression in opening OCAF file
|
|
######################################################
|
|
|
|
set aFile [locate_data_file OCC5023.std]
|
|
|
|
puts "Info: Restore the document"
|
|
|
|
if [info exists DD] {
|
|
catch {Close DD}; unset DD
|
|
}
|
|
|
|
dchrono h reset
|
|
dchrono h start
|
|
|
|
Open ${aFile} DD
|
|
dchrono h stop
|
|
set list [dchrono h show]
|
|
Close DD
|
|
|
|
regexp {CPU user time: +([-0-9.+eE]+)} $list full CPU_user_time
|
|
|
|
set Good_CPU_user_time 2.
|
|
|
|
set CPU_user_time_percent [expr (${CPU_user_time} - ${Good_CPU_user_time}) / ${Good_CPU_user_time} * 100.]
|
|
set percent_max 0.1
|
|
|
|
puts "CPU_user_time = ${CPU_user_time}"
|
|
puts "Good_CPU_user_time = ${Good_CPU_user_time}"
|
|
puts "CPU_user_time_percent = ${CPU_user_time_percent}"
|
|
|
|
if {${CPU_user_time_percent} > ${percent_max}} {
|
|
puts "Faulty OCC5023 : CPU user time is wrong"
|
|
}
|
|
|