mirror of
https://git.dev.opencascade.org/repos/occt.git
synced 2025-07-20 12:45:50 +03:00
8418c61723
Fix for #23273 issue. Fix for #23273 issue (boolean/013/R9). Modifications of tests according to #23260 issue. Attempt to protect against hang-ups due to waiting for standard input change of behaviour of offset/shape_type_i/D7 case. Attempt to protect against hang-ups during initialization of menu in batch mode. increase cpulimit for parallel incmesh. #23260 is fixed. count_parallel is not needed anymore. Deleted unused code. change of behaviour of offset/shape_type_i/D7 case. The fix was incorrect. Second attempt to protect against hang-ups during initialization of menu in batch mode correction of tests in order to awoid instability. Elapsed time changed to CPU user time is performance tests. Processing of errors on Windows. Stop cpulimit killer if armed by test, after the test is completed
60 lines
1.5 KiB
Plaintext
60 lines
1.5 KiB
Plaintext
puts " BUC60068 "
|
|
puts "If scales by 1000, time to compute is 10 times greater "
|
|
##
|
|
## mod pkv from
|
|
restore [locate_data_file buc60068a.rle] a
|
|
restore [locate_data_file buc60068b.rle] b
|
|
restore [locate_data_file buc60068a.rle] c
|
|
restore [locate_data_file buc60068b.rle] d
|
|
restore [locate_data_file buc60068a.rle] e
|
|
restore [locate_data_file buc60068b.rle] f
|
|
restore [locate_data_file buc60068a.rle] g
|
|
restore [locate_data_file buc60068b.rle] h
|
|
## mod pkv from
|
|
##
|
|
|
|
## fuse
|
|
dchrono j start
|
|
bfuse resab a b
|
|
dchrono j stop
|
|
|
|
tscale c 0 0 0 100
|
|
tscale d 0 0 0 100
|
|
dchrono k start
|
|
bfuse rescd c d
|
|
dchrono k stop
|
|
|
|
tscale e 0 0 0 1000
|
|
tscale f 0 0 0 1000
|
|
dchrono l start
|
|
bfuse resef e f
|
|
dchrono l stop
|
|
|
|
tscale g 0 0 0 10000
|
|
tscale h 0 0 0 10000
|
|
dchrono m start
|
|
bfuse resgh g h
|
|
dchrono m stop
|
|
|
|
regexp {CPU user time: ([0-9|.]+) seconds} [dchrono j show] full Jseconds
|
|
regexp {CPU user time: ([0-9|.]+) seconds} [dchrono k show] full Kseconds
|
|
regexp {CPU user time: ([0-9|.]+) seconds} [dchrono l show] full Lseconds
|
|
regexp {CPU user time: ([0-9|.]+) seconds} [dchrono m show] full Mseconds
|
|
|
|
set Jtime [expr $Jseconds * 1.1]
|
|
set Ktime $Kseconds
|
|
set Ltime $Lseconds
|
|
set Mtime $Mseconds
|
|
|
|
if { $Jtime < $Ktime || $Jtime < $Ltime || $Jtime < $Mtime} {
|
|
puts "Error: incorrect performance of bfuse operation:"
|
|
puts "SCALE=1 : $Jtime seconds."
|
|
puts "SCALE=100 : $Ktime seconds."
|
|
puts "SCALE=1000 : $Ltime seconds."
|
|
puts "SCALE=10000 : $Mtime seconds."
|
|
}
|
|
|
|
compound resab rescd resef resgh result
|
|
|
|
set square 2.5e+13
|