tests/bugs/xde/bug23895

   1 puts "============"
   2 puts "OCC23895"
   3 puts "============"
   4 puts ""
   5 #################################################################
   6 # XCAF document should store names for subfigures from IGES files
   7 #################################################################
   8
   9 ReadIges D [locate_data_file bug23895_test.igs]
  10
  11 set aName [XCheckProps D 0 0:1:1:2]
  12
  13 if { [regexp "ARROW" "$aName"] } {
  14     puts "Ok: Subfigure name has been read correctly."
  15 } else {
  16     puts "Error: Subfigure name has not been read."
  17 }
  18