tests/bugs/step/bug28345

   1 puts "# ====================================================================="
   2 puts "# 0028345: Data Exchange - Reading STEP model using STEPCAF crashes"
   3 puts "# ====================================================================="
   4 puts ""
   5
   6 pload DCAF
   7 ReadStep D_1 [locate_data_file bug28345_30338.stp]
   8
   9 # Check imported names
  10 set info [XGetAllLayers D_1]
  11 if { [regexp "COMPONENTS" $info] != 1 } {
  12    puts "Error : wrong layer name"
  13 }
  14
  15 Close D_1