tests/bugs/iges/buc60595_2

   1 puts "=================="
   2 puts "BUC60595"
   3 puts "=================="
   4
   5 set bug_var [ igesbrep [locate_data_file buc60595b.igs] a * ]
   6
   7 tpcompound result
   8
   9 if { [ string match "*Uninspired signal*" $bug_var ] == 1 } {
  10     puts "Error : TEST FAILED"
  11 }
  12
  13 isos 0
  14 isos result 15
  15
  16 puts "Previously here was message:  Uninspired signal 8"
  17
  18 checkview -display result -2d -path ${imagedir}/${test_image}.png