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
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
2015-05-03 Thomas Koenig <[email protected]>
PR fortran/37131
* gfortran.dg/bound_9.f90: Add pointer assignment.
