0025987: Integration part of modified unstable test cases

[occt.git] / tests / bugs / fclasses / bug7287_4

diff --git a/tests/bugs/fclasses/bug7287_4 b/tests/bugs/fclasses/bug7287_4
index 8b64c0a..84a8451 100755 (executable)
--- a/tests/bugs/fclasses/bug7287_4
+++ b/tests/bugs/fclasses/bug7287_4
@@ -1,3 +1,6 @@
+puts "TODO ?OCC25921 Debian60-64: Tcl Exception: Memory leak detected"
+puts "TODO ?OCC25921 Debian60-64: TEST INCOMPLETE"
+
 puts "============"
 puts "OCC7287"
 puts "============"
@@ -12,7 +15,7 @@ puts ""
 
 set BugNumber OCC7287
 
-set NCycles 100
+set NCycles 10
 box b1 10 10 10 100 100 100
 box b2 50 50 50
 
@@ -22,8 +25,5 @@ for {set i 1} {${i} <= ${NCycles}} {incr i } {
     bopcommon r
 
     lappend listmem [meminfo h]
-    if { [checktrend $listmem 0 100 "Memory leak detected"] } {
-        puts "No memory leak, $i iterations"
-        break
-    }
+    checktrend $listmem 0 100 "Memory leak detected"
 }