0027691: Remove dchrono from all test cases and move its to perf group
[occt.git] / tests / bugs / modalg_5 / bug25413
1 puts "========"
2 puts "OCC25413"
3 puts "========"
4 puts ""
5 #############################################################
6 # Line-Shape intersection algorithm became 400 times slower
7 #############################################################
8
9 pload QAcommands
10
11 restore [locate_data_file bug25413.brep] w
12
13 dchrono perf_h reset
14 dchrono perf_h start
15 OCC25413 w
16 dchrono perf_h stop
17
18 set chrono_info [dchrono perf_h show]
19
20 regexp {CPU user time: ([-0-9.+eE]+) seconds} $chrono_info full CPU_time
21 puts "Elapsed time is: $CPU_time"
22
23 if { [checkplatform -windows] } {
24   if {[regexp {Debug mode} [dversion]]} {
25     # initial CPU_time for WINDOWS in DEBUG mode is 90 sec
26     puts "Checking WINDOWS performance in debug mode..."
27     if {$CPU_time > 90.} {
28       puts "ERROR: OCC25413 is reproduced."
29       puts "       Low performance: $CPU_time (but should be less than 90 sec)"
30     } else {
31       puts "Done!"
32     }
33   } else {
34     puts "Checking WINDOWS performance in optimize mode..."
35     # initial CPU_time for WINDOWS in OPTIMIZE mode is 30 sec
36     if {$CPU_time > 30.} {
37       puts "ERROR: OCC25413 is reproduced."
38       puts "       Low performance: $CPU_time (but should be less than 30 sec)"
39     } else {
40       puts "Done!"
41     }
42   }
43 } else {
44   if {[regexp {Debug mode} [dversion]]} {
45     # initial CPU_time for LINUX in DEBUG mode is 90 sec
46     puts "Checking LINUX performance in debug mode..."
47     if {$CPU_time > 90.} {
48       puts "ERROR: OCC25413 is reproduced."
49       puts "       Low performance: $CPU_time (but should be less than 90 sec)"
50     } else {
51       puts "Done!"
52     }
53   } else {
54     puts "Checking LINUX performance in optimize mode..."
55     # initial CPU_time for LINUX in OPTIMIZE mode is 30 sec
56     if {$CPU_time > 30.} {
57       puts "ERROR: OCC25413 is reproduced."
58       puts "       Low performance: $CPU_time (but should be less than 30 sec)"
59     } else {
60       puts "Done!"
61     }
62   }
63 }