1 files changed, 13 insertions, 0 deletions
diff --git a/gcc/testsuite/gnat.dg/interface4.adb b/gcc/testsuite/gnat.dg/interface4.adb
new file mode 100644
index 000000000..8dde602c3
--- /dev/null
+++ b/gcc/testsuite/gnat.dg/interface4.adb
@@ -0,0 +1,13 @@
+--  { dg-do compile }
+
+procedure interface4 is
+     generic
+       type I1 is interface;
+       type I2 is limited interface;
+       type I3 is interface and I1;
+       type I4 is limited interface and I2;
+     package Pack_I is
+     end Pack_I;
+begin
+     null;
+end interface4;