1 files changed, 13 insertions, 0 deletions
diff --git a/gcc-4.9/gcc/testsuite/gnat.dg/specs/pack7.ads b/gcc-4.9/gcc/testsuite/gnat.dg/specs/pack7.ads
new file mode 100644
index 000000000..8a1250a60
--- /dev/null
+++ b/gcc-4.9/gcc/testsuite/gnat.dg/specs/pack7.ads
@@ -0,0 +1,13 @@
+-- { dg-do compile }
+
+package Pack7 is
+
+   type R (D : Natural) is record
+      S : String (1 .. D);
+      N : Natural;
+      B : Boolean;
+   end record;
+   for R'Alignment use 4;
+   pragma Pack (R);
+
+end Pack7;