0024682: Move out B-spline cache from curves and surfaces to dedicated classes BSplCL...
[occt.git] / tests / boolean / bsection / M9
index b3608d7..dd1501d 100644 (file)
@@ -18,7 +18,10 @@ compound result
 repeat 21 {
   plane p_$i 0 $i*100 0  0 1 0
   mkface f_$i p_$i
-  bsection s_$i b f_$i
+  set bsres [bsection s_$i b f_$i]
+  if { [regexp {Error} $bsres] } {
+    puts "Error: bsection not done"
+  }
   compound result s_$i result
   set dist [expr $i * 100]
   puts "OK Section:$dist"