Test case for this issue is updated

diff --git a/tests/bugs/modalg_5/bug25772 b/tests/bugs/modalg_5/bug25772
index b9a430211572ee5e0383bcdec5781c333a7fe6b8..c1906dc4b6fbd5b1d18e868a1b987df50c67936d 100644 (file)
--- a/tests/bugs/modalg_5/bug25772
+++ b/tests/bugs/modalg_5/bug25772
@@ -9,24 +9,9 @@ puts ""
 restore [locate_data_file pl1.brep] pl
 restore [locate_data_file selected_holes.brep] hl
 
-set log [bopargcheck pl hl #F]
-
-if{[string compare $log "Shape(s) seem(s) to be valid for BOP.\n"] == 0} {
-  puts "OK: Source shapes are valid in terms of bopargcheck"
-}else{
-  puts "Error: source shapes are invalid in terms of bopargcheck"
-}
-
 bcut result pl hl
 
-set log [bopargcheck result #F]
-
-if{[string compare $log "Shape(s) seem(s) to be valid for BOP.\n"] == 0} {
-  puts "OK: Source shapes are valid in terms of bopargcheck"
-}else{
-  puts "Error: source shapes are invalid in terms of bopargcheck"
-}
-
+checkshape result
 
 # Analysis of "nbshapes res"
 set nb_f_good 2
@@ -35,3 +20,7 @@ set nb_sol_good 0
 set nb_compsol_good 0
 set nb_compound_good 1
 
+smallview
+donly result
+fit
+set only_screen_axo 1