tests/bugs/xde/bug29436_2

   1 puts "=========="
   2 puts "OCC29436"
   3 puts "=========="
   4 puts ""
   5 ########################################
   6 # Extend Expand compounds functionality
   7 ########################################
   8 pload ALL
   9
  10 XOpen [locate_data_file bug29436_compsolid.xbf] D
  11 XExpand D 1 0:1:1:1
  12
  13 # check colors
  14 set color [XGetShapeColor D 0:1:1:2]
  15 if {$color != "RED"} {
  16   puts "Error: metadata lost during expand"
  17 }
  18 set color [XGetShapeColor D 0:1:1:4]
  19 if {$color != "RED"} {
  20   puts "Error: metadata lost during expand"
  21 }
  22 set color [XGetShapeColor D 0:1:1:6]
  23 if {$color != "RED"} {
  24   puts "Error: metadata lost during expand"
  25 }
  26
  27 Close D