1 puts "================"
3 puts "================"
5 #######################################################################################
6 # Performance regression on step import
7 ######################################################################################
12 if { [regexp {Debug mode} [dversion]] } {
15 if { [regexp {Windows} [dversion]] } {
25 testreadstep [locate_data_file bug25424_Secure.stp] result
28 set q [dchrono h show]
30 regexp {CPU user time: ([-0-9.+eE]+) seconds} $q full z
33 if { $z > ${max_time} } {
34 puts "Elapsed time of testreadstep is more than ${max_time} seconds - Faulty"
36 puts "Elapsed time of testreadstep is less than ${max_time} seconds - OK"
48 set nb_compound_good 0
49 set nb_shape_good 15879