tests/bugs/modalg_5/bug24809

   1 puts "========="
   2 puts "OCC24809"
   3 puts "========="
   4 puts ""
   5 ##############################################################################
   6 # Exception is raised during perform of "bfillds" command on attached shape
   7 ##############################################################################
   8
   9 cpulimit 1500
  10
  11 restore [locate_data_file bug24809_test3.brep] b
  12
  13 bclearobjects
  14 bcleartools
  15 set shapes [explode b f]
  16 set nbs [llength $shapes]
  17 for {set i 1} {$i <= $nbs} {incr i} {
  18   baddobjects b_$i
  19 }
  20 bfillds -s