0003883: Problems of reading colors and layers in XDEDRAWEXE
[occt.git] / tests / bugs / step / bug3883_1
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_bolt.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 }