From: Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
Date: Sat, 25 Sep 2004 12:50:02 +0000 (+0200)
Subject: * gfortran.dg/pr15324.f90: Make array bounds consistent.
X-Git-Tag: releases/gcc-4.0.0~4598
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=2c855398563d3cf8f27a5c1f67860e6838cc3e96;p=thirdparty%2Fgcc.git

* gfortran.dg/pr15324.f90: Make array bounds consistent.

From-SVN: r88096
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index aa50efc10c0b..b2db1410711c 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2004-09-25  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
+
+	* gfortran.dg/pr15324.f90: Make array bounds consistent.
+
 2004-09-25  Jan Hubicka  <jh@suse.cz>
 
 	* compile/30040909-1.c: New test.
diff --git a/gcc/testsuite/gfortran.dg/pr15324.f90 b/gcc/testsuite/gfortran.dg/pr15324.f90
index ce534633146b..d918717e7482 100644
--- a/gcc/testsuite/gfortran.dg/pr15324.f90
+++ b/gcc/testsuite/gfortran.dg/pr15324.f90
@@ -4,7 +4,7 @@
 program strarray_6
 character(5), dimension(:), allocatable :: c
 n = 3
-allocate(c(-1:n-1))
+allocate(c(-1:n-2))
 c = "BLUBB"
 call foo(c)
 call bar(c,n)