aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.9/gcc/testsuite/gnat.dg/opt3.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc-4.9/gcc/testsuite/gnat.dg/opt3.adb')
-rw-r--r--gcc-4.9/gcc/testsuite/gnat.dg/opt3.adb11
1 files changed, 11 insertions, 0 deletions
diff --git a/gcc-4.9/gcc/testsuite/gnat.dg/opt3.adb b/gcc-4.9/gcc/testsuite/gnat.dg/opt3.adb
new file mode 100644
index 000000000..b8ca2c7fb
--- /dev/null
+++ b/gcc-4.9/gcc/testsuite/gnat.dg/opt3.adb
@@ -0,0 +1,11 @@
+-- { dg-do compile }
+-- { dg-options "-O3" }
+
+with Opt3_Pkg; use Opt3_Pkg;
+
+procedure Opt3 is
+ type Buffer_Type is array (Integer range <> ) of Short_Integer;
+ B : Buffer_Type (1 .. 256) := (others => 0);
+begin
+ F (B(1));
+end;