From: vsr <vsr@opencascade.com>
Date: Mon, 8 Dec 2014 08:22:09 +0000 (+0300)
Subject: Adjusting testing cases
X-Git-Tag: V6_8_0p1~9
X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=79fb9ef82fca5c2ef7f85378ed055e7515854592;p=occt-copy.git

Adjusting testing cases
---

diff --git a/tests/bugs/modalg_5/bug25488 b/tests/bugs/modalg_5/bug25488
index 668b109d08..4a937ac459 100644
--- a/tests/bugs/modalg_5/bug25488
+++ b/tests/bugs/modalg_5/bug25488
@@ -8,6 +8,7 @@ puts ""
 
 set Tolerance 3.0e-7
 set D_good 0.
+set Limit_Tol 1.0e-7
 
 restore [locate_data_file OCC25488_sb1_1t.draw] sb1
 restore [locate_data_file OCC25488_sb2_1t.draw] sb2
@@ -22,12 +23,12 @@ while {$i != [llength $bug_info]} {
   xdistcs ${res_i} sb1 0 1 10
   set BugLog [dlog get]
   set BugList [split ${BugLog} {TD= \t\n}]
-  checkList ${BugList} ${Tolerance} ${D_good}
+  checkList ${BugList} ${Tolerance} ${D_good} ${Limit_Tol}
   dlog reset
   dlog on
   xdistcs ${res_i} sb2 0 1 10
   set BugLog [dlog get]
   set BugList [split ${BugLog} {TD= \t\n}]
-  checkList ${BugList} ${Tolerance} ${D_good}
+  checkList ${BugList} ${Tolerance} ${D_good} ${Limit_Tol}
   set i [expr {$i + 1}]
 }