1 files changed, 21 insertions, 0 deletions
diff --git a/gcc/testsuite/gnat.dg/aggr2.adb b/gcc/testsuite/gnat.dg/aggr2.adb
new file mode 100644
index 000000000..3e9dc40f8
--- /dev/null
+++ b/gcc/testsuite/gnat.dg/aggr2.adb
@@ -0,0 +1,21 @@
+-- { dg-do compile }
+
+procedure aggr2 is
+   task type T_Task;
+-- 
+   task body T_Task is begin null; end;
+-- 
+   type Lim_Rec is record
+      T : T_Task;
+   end record;
+-- 
+   generic
+      Formal : Lim_Rec;
+   package P_G is
+   end P_G;
+-- 
+   package P is new P_G (Formal => (T => <>));
+begin
+   null;
+end;
+