tests/bugs/modalg_5/bug24220

   1 puts "============"
   2 puts "OCC24220"
   3 puts "============"
   4 puts ""
   5 ######################################################
   6 # bopargcheck returns valid for C0 shape but results of boolean operations are broken with such shapes
   7 ######################################################
   8
   9 restore [locate_data_file bug24220_A.brep] result
  10
  11 decho off
  12 set info [bopargcheck result]
  13 decho on
  14
  15 if { [regexp "Faulties, that can not be treated by BOP, are detected" ${info}] != 1 } {
  16     puts "Error : message is not correct"
  17 } else {
  18     puts "OK : message is correct"
  19 }
  20
  21 set 3dviewer 1