mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-04-03 17:56:21 +03:00
e837410dac
All uses of "MDTV-Standard" and "MDTV-Design" in tests changed to "BinOcaf", and "MDTV-XCAF" changed to "BinXCAF". Formats changed: .std to .cbf, .dxc to .dbf. Test groups renamed accordingly: xcaf: brep_to_dxc -> brep_to_xbf, igs_to_dxc -> igs_to_xbf, stp_to_dxc -> stp_to_xbf, dxc -> xbf/A1, dxc_add_CL -> xbf_add_CL xml: ocaf_std -> ocaf_cbf, xcaf_dxc -> xcaf_xbf
63 lines
1.6 KiB
Plaintext
63 lines
1.6 KiB
Plaintext
puts "=========="
|
|
puts "OCC2793"
|
|
puts "=========="
|
|
puts ""
|
|
########################################################################
|
|
# BinOcaf: low performance saving documents with large attributes
|
|
########################################################################
|
|
|
|
NewDocument D BinOcaf
|
|
|
|
# Loaded shapes for attributes
|
|
restore [locate_data_file Radhaus.brep] shape1
|
|
restore [locate_data_file shading_wrongshape_009.brep] shape2
|
|
restore [locate_data_file FORM-11.brep] shape3
|
|
restore [locate_data_file OCC22759-weldt6.brep] shape4
|
|
restore [locate_data_file BPLSEITRE.brep] shape5
|
|
restore [locate_data_file OCC22302.brep] shape6
|
|
restore [locate_data_file ROVER.brep] shape7
|
|
restore [locate_data_file bug24083_polyline.brep] shape8
|
|
|
|
# Create a label
|
|
set lab1 [Label D 0:2]
|
|
set lab2 [Label D 0:3]
|
|
set lab3 [Label D 0:4]
|
|
set lab4 [Label D 0:5]
|
|
set lab5 [Label D 0:6]
|
|
set lab6 [Label D 0:7]
|
|
set lab7 [Label D 0:8]
|
|
set lab8 [Label D 0:9]
|
|
|
|
# Load shapes on labels
|
|
NewShape D ${lab1} shape1
|
|
NewShape D ${lab2} shape2
|
|
NewShape D ${lab3} shape3
|
|
NewShape D ${lab4} shape4
|
|
NewShape D ${lab5} shape5
|
|
NewShape D ${lab6} shape6
|
|
NewShape D ${lab7} shape7
|
|
NewShape D ${lab8} shape8
|
|
|
|
# Save document
|
|
file delete -force ${imagedir}/2793.cbf
|
|
dchrono h reset
|
|
dchrono h start
|
|
SaveAs D ${imagedir}/2793.cbf
|
|
dchrono h stop
|
|
Close D
|
|
|
|
# Check
|
|
set info [dchrono h show]
|
|
regexp {CPU user time: ([-0-9.+eE]+) seconds} $info full cpu_time
|
|
|
|
set max_time 100
|
|
if { [regexp {Debug mode} [dversion]] } {
|
|
set max_time 200
|
|
}
|
|
|
|
if { $cpu_time > ${max_time} } {
|
|
puts "Error: performance saving document D is too low"
|
|
} else {
|
|
puts "OK: performance saving document D is high"
|
|
}
|