8447359f |
1 | puts "========" |
2 | puts "OCC27021" |
3 | puts "========" |
4 | puts "" |
5 | ########################################################### |
6 | # TopExp::Vertices performance optimization |
7 | ########################################################### |
8 | |
9 | pload QAcommands |
10 | |
11 | if { [regexp {Debug mode} [dversion]] } { |
12 | if { [regexp {Windows} [dversion]] } { |
13 | set max_time 8. |
14 | set max_time2 5. |
15 | } else { |
16 | set max_time 8. |
17 | set max_time2 5. |
18 | } |
19 | } else { |
20 | if { [regexp {Windows} [dversion]] } { |
21 | set max_time 8. |
22 | set max_time2 5. |
23 | } else { |
24 | set max_time 8. |
25 | set max_time2 5. |
26 | } |
27 | } |
28 | |
29 | restore [locate_data_file bug27021_shape.brep] f |
30 | |
31 | set log [OCC27021 f] |
32 | |
33 | regexp {Retrieving 100000000 vertices using approach A\)\.\.\.done in ([-0-9.+eE]+) seconds} ${log} full A_sec |
34 | regexp {Retrieving 100000000 vertices using approach B\)\.\.\.done in ([-0-9.+eE]+) seconds} ${log} full B_sec |
35 | |
36 | |
37 | if { ${A_sec} > ${max_time} } { |
38 | puts "Retrieving 100000000 vertices using approach A) is more than ${max_time} seconds - Faulty" |
39 | } else { |
40 | puts "Retrieving 100000000 vertices using approach A) is less than ${max_time} seconds - OK" |
41 | } |
42 | |
43 | if { ${B_sec} > ${max_time2} } { |
44 | puts "Retrieving 100000000 vertices using approach A) is more than ${max_time2} seconds - Faulty" |
45 | } else { |
46 | puts "Retrieving 100000000 vertices using approach A) is less than ${max_time2} seconds - OK" |
47 | } |