path: root/gdb/testsuite/gdb.chill/gch1494.ch

gch1494: MODULE

DCL x STRUCT (CASE OF
               : b UBYTE,
               : s CHARS(10) VARYING
              ESAC) INIT := [ .b: 1 ];

END gch1494;