summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gnat.dg/opt13_pkg.ads
blob: f52f782f4d6f49f23a6d81d55ecd54db8083c32a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
package Opt13_Pkg is

    N : Natural := 0;

    type My_Type is private;

    procedure Allocate (T : out My_Type);

private

    type Data;

    type My_Type is access Data;

end Opt13_Pkg;