diff options
Diffstat (limited to 'gcc/testsuite/gnat.dg/prot2_pkg2.ads')
-rw-r--r-- | gcc/testsuite/gnat.dg/prot2_pkg2.ads | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/gcc/testsuite/gnat.dg/prot2_pkg2.ads b/gcc/testsuite/gnat.dg/prot2_pkg2.ads new file mode 100644 index 000000000..cdd436b8a --- /dev/null +++ b/gcc/testsuite/gnat.dg/prot2_pkg2.ads @@ -0,0 +1,17 @@ +generic + + type T is private; + +package Prot2_Pkg2 is + + type Id is private; + + procedure Create (B : out Id); + procedure Delete (B : in out Id); + +private + + type Rec; + type Id is access Rec; + +end Prot2_Pkg2; |