tests/bugs/step/bug3883_4

   1 puts "======="
   2 puts "OCC3883"
   3 puts "======="
   4 puts ""
   5 #######################################################
   6 # Problems of reading colors and layers in XDEDRAWEXE
   7 #######################################################
   8
   9 set theColors ""
  10 set theLayers ""
  11
  12 ReadStep D [locate_data_file bug3883_xr2-ct-214_plate.stp]
  13
  14 set theColors [XGetAllColors D]
  15 set theLayers [XGetAllLayers D]
  16
  17 if {$theColors == ""} {
  18   puts "ERROR: OCC3883 is reproduced. Colors have not been read."
  19 }
  20 if {$theLayers == ""} {
  21   puts "ERROR: OCC3883 is reproduced. Layers have not been read."
  22 }