0028324: Configuration, genproj.tcl - compilation error while targeting OS X 10.8...
[occt.git] / tests / bugs / heal / bug24596_1
CommitLineData
7c8090aa 1puts "============"
2puts "OCC24596"
3puts "============"
4puts ""
5###############################
6## Slow import of IGES data
7###############################
8
9pload QAcommands
10
7c8090aa 11if { [regexp {Debug mode} [dversion]] } {
0a58bfe2 12 cpulimit 8500
7c8090aa 13 if { [regexp {Windows} [dversion]] } {
0a58bfe2 14 set max_time 3000
15 set max_time2 2300
7c8090aa 16 } else {
0a58bfe2 17 set max_time 5500
18 set max_time2 4000
7c8090aa 19 }
20} else {
fa84b8ff 21 cpulimit 2600
7c8090aa 22 if { [regexp {Windows} [dversion]] } {
fa84b8ff 23 set max_time 1100
24 set max_time2 700
7c8090aa 25 } else {
fa84b8ff 26 set max_time 1600
27 set max_time2 1000
7c8090aa 28 }
29}
30
31# 1 - igesread
32dchrono h reset
33dchrono h start
34
35igesread [locate_data_file 100B_Nosecone_with_Triangular_FSS.igs] a 43479
36
37dchrono h stop
38set q [dchrono h show]
39
40regexp {CPU user time: ([-0-9.+eE]+) seconds} $q full z
41puts "$z"
42
43if { $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
50dchrono h2 reset
51dchrono h2 start
52
53checkshape a_1
54
55dchrono h2 stop
56set q2 [dchrono h2 show]
57
58regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2
59puts "$z2"
60
61if { $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}