0025987: Integration part of modified unstable test cases

[occt.git] / tests / bugs / modalg_2 / bug472_2

diff --git a/tests/bugs/modalg_2/bug472_2 b/tests/bugs/modalg_2/bug472_2
index 4860fd4..bb40ce5 100755 (executable)
--- a/tests/bugs/modalg_2/bug472_2
+++ b/tests/bugs/modalg_2/bug472_2
@@ -1,4 +1,9 @@
-puts "TODO OCC12345 ALL: Error : The command is not valid. The square is"
+puts "TODO OCC25917 ALL: Error : The command is not valid. The square is"
+if { [regexp {Debug mode} [dversion]] } {
+  puts "TODO OCC25917 ALL: TEST INCOMPLETE"
+  puts "TODO OCC25917 ALL: Tcl Exception"
+}
+
 puts "========================"
 puts " OCC472 "
 puts "(case 2)"