0028324: Configuration, genproj.tcl - compilation error while targeting OS X 10.8...
[occt.git] / tests / bugs / modalg_5 / bug25742_1
1 puts "============"
2 puts "OCC25742"
3 puts "============"
4 puts ""
5 ###############################
6 ## A partition of 2 shapes stresses a performance issue
7 ###############################
8
9 if { [regexp {Debug mode} [dversion]] } {
10   if { [regexp {Windows} [dversion]] } {
11     set max_time 150
12   } else {
13     set max_time 100
14   }
15 } else {
16   if { [regexp {Windows} [dversion]] } {
17     set max_time 30
18   } else {
19     set max_time 20
20   }
21 }
22
23 restore [locate_data_file bug25742_pipeFiss.brep] b1
24 restore [locate_data_file bug25742_shellFiss.brep] b2
25
26 bclearobjects
27 bcleartools
28 baddobjects b1
29 baddtools b2
30  
31 dchrono h reset
32 dchrono h start
33
34 bfillds
35 bbuild result
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 bbuild is more than ${max_time} seconds - Error"
45 } else {
46     puts "Elapsed time of bbuild is less than ${max_time} seconds - OK"
47 }
48
49 checkprops result -s 280627 
50 checkshape result
51
52 set nbshapes_expected "
53 Number of shapes in shape
54  VERTEX    : 14
55  EDGE      : 24
56  WIRE      : 11
57  FACE      : 10
58  SHELL     : 1
59  SOLID     : 0
60  COMPSOLID : 0
61  COMPOUND  : 1
62  SHAPE     : 61
63 "
64 checknbshapes result -ref "${nbshapes_expected}" -t -m "Partition of 2 shapes"
65 checkview -display result -3d -path ${imagedir}/${test_image}.png