0025138: SIGSEGV when sweeping along helix
[occt.git] / tests / bugs / modalg_6 / bug27021
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 }