tests/bugs/modalg_7/bug29182

   1 puts "========"
   2 puts "OCC29182"
   3 puts "========"
   4 puts ""
   5 #################################################
   6 # BOPAlgo_PaveFiller sometimes raises exception in parallel mode
   7 #################################################
   8
   9 binrestore [locate_data_file bug29182_access_violation.bin] a
  10 explode a So
  11 bclearobjects
  12 bcleartools
  13 baddobjects a_1
  14 baddtools a_2 a_3 a_4 a_5 a_6 a_7 a_8 a_9 a_10 a_11 a_12
  15 brunparallel 1
  16 bfillds
  17 bbuild result
  18
  19 checknbshapes result -m result -shell 17 -solid 17
  20 checkprops result -v 1.18596e+006 -s 1.28028e+006
  21 checkshape result
  22 if ![regexp "This shape seems to be OK" [bopcheck result]] {
  23   puts "Error: result is self-intersected"
  24 }