http://gcc.gnu.org/bugzilla/show_bug.cgi?id=47051
Summary: [4.6 Regression] wrong reallocate
Product: gcc
Version: 4.6.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassig...@gcc.gnu.org
ReportedBy: joost.vandevond...@pci.uzh.ch
In the following a reallocation seems to happen, changing the bounds of a.
However the size of a and b are the same, so I would not expect this.
INTEGER, DIMENSION(:), ALLOCATABLE :: a,b
ALLOCATE(a(-1:1),b(1:3))
b=0
a=b
write(6,*) LBOUND(a)
IF(LBOUND(a,1).NE.-1) STOP "BUG"
END
