tests/bugs/modalg_2/bug295

   1 pload QAcommands
   2
   3 puts "================"
   4 puts "OCC295"
   5 puts "================"
   6 puts ""
   7 ##############################################################
   8 ## Exception is raised in the GeomConvert_CompCurveToBSplineCurve
   9 ##Exception "Run-time exception error
  10 ## current exception: xalloc. No handler for exception.
  11 ## " is raised during merging to edges in DRAW with command "merge re e1 e2".
  12 ##############################################################
  13
  14 restore [locate_data_file OCC295-1.brep] e1
  15
  16 set che [checkshape e1]
  17 if { [regexp {Faulty} $che] == 1} {
  18     puts "Faulty OCC295 (shape1): Source shape is invalid. It was detected by Checkshape command"
  19     puts "Body of the script was NOT executed"
  20     renamevar e1 result
  21 } else {
  22     puts "OCC295 OK (shape1): Source shape is valid"
  23     restore [locate_data_file OCC295-2.brep] e2
  24     set che [checkshape e2]
  25     if { [regexp {Faulty} $che] == 1} {
  26         puts "Faulty OCC295 (shape2): Source shape is invalid. It was detected by Checkshape command"
  27         puts "Body of the script was NOT executed"
  28         renamevar e2 result
  29     } else {
  30         puts "OCC295 OK (shape2): Source shape is valid"
  31         OCC295 result e1 e2
  32     }
  33 }
  34
  35 checkprops result -l 19.5611
  36 checkshape result
  37 checksection result
  38 checkview -display result -2d -path ${imagedir}/${test_image}.png