0027691: Remove dchrono from all test cases and move its to perf group
[occt.git] / tests / bugs / heal / bug24596_1
1 puts "============"
2 puts "OCC24596"
3 puts "============"
4 puts ""
5 ###############################
6 ## Slow import of IGES data
7 ###############################
8
9 pload QAcommands
10
11 if { [regexp {Debug mode} [dversion]] } {
12   cpulimit 8500
13   if { [regexp {Windows} [dversion]] } {
14     set max_time 3000
15     set max_time2 2300
16   } else {
17     set max_time 5500
18     set max_time2 4000
19   }
20 } else {
21   cpulimit 2600
22   if { [regexp {Windows} [dversion]] } {
23     set max_time 1100
24     set max_time2 700
25   } else {
26     set max_time 1600
27     set max_time2 1000
28   }
29 }
30
31 # 1 - igesread
32 dchrono h reset
33 dchrono h start
34
35 igesread [locate_data_file 100B_Nosecone_with_Triangular_FSS.igs] a 43479
36
37 dchrono h stop
38 set q [dchrono h show]
39
40 regexp {CPU user time: ([-0-9.+eE]+) seconds} $q full z
41 puts "$z"
42
43 if { $z > ${max_time} } {                                         
44     puts "Elapsed time of igesread is more than ${max_time} seconds - Faulty"
45 } else {
46     puts "Elapsed time of igesread is less than ${max_time} seconds - OK"
47 }
48
49 # 2 - checkshape
50 dchrono h2 reset
51 dchrono h2 start
52
53 checkshape a_1
54
55 dchrono h2 stop
56 set q2 [dchrono h2 show]
57
58 regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2
59 puts "$z2"
60
61 if { $z2 > ${max_time2} } {                                         
62     puts "Elapsed time of checkshape is more than ${max_time2} seconds - Faulty"
63 } else {
64     puts "Elapsed time of checkshape is less than ${max_time2} seconds - OK"
65 }