tests/bugs/step/bug26925

   1 puts "# ====================================================================="
   2 puts "# 0026925: Data Exchange - Exceptions can be raised if assembly is empty"
   3 puts "# ====================================================================="
   4 puts ""
   5
   6 pload DCAF
   7 XNewDoc D
   8 XNewShape D
   9 box a 0 0 0 10 10 10
  10 XAddShape D a 0
  11 ttranslate a 10 0 0
  12 XAddComponent D 0:1:1:1 a
  13 XGetShape s0 D 0:1:1:1
  14 checkshape s0 l
  15 XUpdateAssemblies D
  16 XGetShape s1 D 0:1:1:1
  17
  18 checkshape s1 r
  19 checknbshapes s1 -vertex 8 -edge 12  -shape 35 -face 6 -solid 1 -shell 1
  20
  21 Close D