tests/bugs/moddata_2/bug618

   1
   2 puts "========================"
   3 puts "OCC618"
   4 puts "========================"
   5 puts ""
   6 ############################
   7 ## Exception during bop
   8 ############################
   9
  10 restore [locate_data_file OCC618a.brep] a
  11 checkshape a
  12 restore [locate_data_file OCC618b.brep] b
  13 checkshape b
  14
  15 if [catch {bop a b} catch_result] {
  16     puts "Faulty OCC618 : BOP operation was made wrongly"
  17 } else {
  18     puts "OCC618 OK: BOP operation works OK"
  19 }
  20
  21 set 2dviewer 0