tests/bugs/iges/bug272_1

   1 puts "========"
   2 puts "OCC272"
   3 puts "========"
   4
   5 igesbrep [locate_data_file 919-001-T02-04-CP-VL.igs] a *
   6
   7 tpcompound result
   8 checkshape result
   9 checkshape result r
  10
  11 if { [llength [whatis result]] == 3 } {
  12     puts "Error : There is no result"
  13 }
  14
  15 checkview -display result -2d -path ${imagedir}/${test_image}.png
  16