gdb/testsuite/gdb.chill/gch1280.ch

   1 gch1280: MODULE
   2
   3 SYNMODE m_x = ARRAY (1:3) LONG;
   4 DCL v_x m_x;
   5 DCL v_xx m_x;
   6
   7 doit: PROC ()
   8 END doit;
   9
  10 v_x := [ 11, 12, 13 ];
  11 doit ();
  12
  13 END gch1280;