------- Comment #3 from dfranke at gcc dot gnu dot org 2007-07-05 14:31 -------
Reduced testcase:
$> cat pr31320.f90
type :: a
integer, allocatable :: i(:)
end type a
type(a) :: x, y
x = a ((/1, 2, 3, 4/))
y = x
end
$> gfortran-svn -g -Wall pr31320.f90
$> valgrind --tool=memcheck --leak-check=full --show-reachable=yes a.out
[...]
==3173== Invalid read of size 1
==3173== at 0x4022CC1: memcpy (mc_replace_strmem.c:406)
==3173== by 0x80488AE: MAIN__ (alloc_comp_assign_2e.f90:8)
==3173== by 0x8048938: main (fmain.c:22)
==3173== Address 0x422C5C3 is 3 bytes after a block of size 16 alloc'd
==3173== at 0x40213D0: malloc (vg_replace_malloc.c:149)
==3173== by 0x8048710: MAIN__ (alloc_comp_assign_2e.f90:7)
==3173== by 0x8048938: main (fmain.c:22)
[...]
In addition, while reducing this, I saw different kinds of other errors, most
notably unnecessary free's and leaking memory.
--
dfranke at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |dfranke at gcc dot gnu dot
| |org
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Last reconfirmed|0000-00-00 00:00:00 |2007-07-05 14:31:03
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31320
