1 files changed, 13 insertions, 0 deletions
diff --git a/gcc/testsuite/gnat.dg/aliasing1.ads b/gcc/testsuite/gnat.dg/aliasing1.ads
new file mode 100644
index 000000000..9ebfd6206
--- /dev/null
+++ b/gcc/testsuite/gnat.dg/aliasing1.ads
@@ -0,0 +1,13 @@
+package Aliasing1 is
+
+  type Rec is record
+    I : Integer;
+  end record;
+
+  type Ptr is access all Integer;
+
+  R : Rec;
+
+  function F (P : Ptr) return Integer;
+
+end Aliasing1;