Adjusting testing case for debug mode

diff --git a/tests/bugs/caf/bug2793 b/tests/bugs/caf/bug2793
index ab7beb1..558d277 100644 (file)
--- a/tests/bugs/caf/bug2793
+++ b/tests/bugs/caf/bug2793
@@ -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"