9c80aadf |
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 | } |