tests/bugs/modalg_2/bug22986

   1 puts "==========="
   2 puts "OCC22986"
   3 puts "==========="
   4 puts ""
   5 #######################################################################
   6 # Regression with OCCT652 on Windows. DRAWEXE craches during featprism
   7 #######################################################################
   8
   9 set BugNumber OCC22986
  10
  11 #eval datadir ${CfeDir}/data/900
  12
  13 restore [locate_data_file CFE900_cts21gbs.rle] base
  14 restore [locate_data_file cts21322_face.rle] wire
  15
  16 explode base face
  17 copy base_6 fsketch
  18
  19 splitshape result fsketch fsketch wire
  20 if { [llength [explode result f]] != 3 } {
  21     puts "Faulty ${BugNumber} : The result of splitshape command is incorrect."
  22 } else {
  23     puts "${BugNumber}  OK"
  24 }
  25
  26 set square 414
  27 set 3dviewer 0