diff options
Diffstat (limited to 'gcc/testsuite/gnat.dg/asynch.ads')
-rw-r--r-- | gcc/testsuite/gnat.dg/asynch.ads | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/testsuite/gnat.dg/asynch.ads b/gcc/testsuite/gnat.dg/asynch.ads new file mode 100644 index 000000000..c9b70aaf0 --- /dev/null +++ b/gcc/testsuite/gnat.dg/asynch.ads @@ -0,0 +1,8 @@ +with Ada.Finalization; +package asynch is + type t_ctrl is new Ada.Finalization.Controlled with record + stuff : Natural := 0; + end record; + + function null_ctrl return t_ctrl; +end asynch; |