diff mbox

[Fortran,committed] Fixed test case

Message ID 5546663F.3080908@netcologne.de
State New
Headers show

Commit Message

Thomas Koenig May 3, 2015, 6:17 p.m. UTC
Hello world,

I have just committed the following patch as obvious after testing.
This fixes the regression from the incorrect code in the test case
of my lbound simplification patch.

Regards

	Thomas

2015-05-03  Thomas Koenig  <tkoenig@gcc.gnu.org>

	PR fortran/37131
	* gfortran.dg/bound_9.f90:  Add pointer assignment.
diff mbox

Patch

Index: gfortran.dg/bound_9.f90
===================================================================
--- gfortran.dg/bound_9.f90     (Revision 222661)
+++ gfortran.dg/bound_9.f90     (Arbeitskopie)
@@ -54,6 +54,7 @@ 
   call foo(empty, a(2:0), n, m)
   if (n .ne. 1 .or. m .ne. 1) call abort
   allocate (x(0))
+  y => a(3:2)
   call bar (x, y, n, m)
   if (n .ne. 1 .or. m .ne. 1) call abort