Adjusting testing case for debug mode
authorbugmaster <bugmaster@opencascade.com>
Fri, 18 Jul 2014 08:36:39 +0000 (12:36 +0400)
committerbugmaster <bugmaster@opencascade.com>
Fri, 18 Jul 2014 08:36:39 +0000 (12:36 +0400)
tests/bugs/caf/bug2793

index ab7beb1..558d277 100644 (file)
@@ -49,7 +49,13 @@ Close D
 # Check
 set info [dchrono h show]
 regexp {CPU user time: ([-0-9.+eE]+) seconds} $info full cpu_time
-if { $cpu_time > 100 } {
+
+set max_time 100
+if { [regexp {Debug mode} [dversion]] } {
+   set max_time 200
+}
+
+if { $cpu_time > ${max_time} } {
     puts "Error: performance saving document D is too low"
 } else {
     puts "OK: performance saving document D is high"