0028567: Get rid of the unused DRAW commands based on old Boolean Operations (BRepAlgo)
[occt.git] / tests / bugs / modalg_4 / pro19626
index 42dd836..1b8e4b6 100755 (executable)
@@ -9,11 +9,9 @@ restore [locate_data_file pro19626b.brep] b
 checkshape b
 
 bsection result a b
-regexp { nb alone Vertices : +([-0-9.+eE]+)} [checksection result] full num
-if { $num != 2 } {
-    puts " Faulty PRO19626: Result shape is INcorrect !!! "
-} else {
-    puts "PRO19626 OK : Result shape is CORRECT !!! "
+
+if {[lindex [checksection result] 4] != 2} {
+  puts "Error PRO19626: section is incomplete"
 }
 
 checkprops result -l 174.597