gdb/testsuite/gdb.ada/array_return/pck.ads


1
2
3
4
5
6
7
8
9
10

package Pck is

   type Data_Small is array (1 .. 2) of Integer;
   type Data_Large is array (1 .. 4) of Integer;

   function Create_Small return Data_Small;
   function Create_Large return Data_Large;

end Pck;