------- Comment #2 from dfranke at gcc dot gnu dot org 2007-04-18 14:25 -------
$> cat pr31620.f90
program test_assign
type my_type
integer :: a
integer :: b
end type my_type
type(my_type), dimension(1) :: mine ! note that MINE is an array
mine%b=4
mine%a=1
print *, mine
mine%a=0
print *, mine
end program test_assign
$> gfortran-svn -g -fdump-tree-original pr31620.f90
The dump shows between the print statements:
[...]
(void) __builtin_memset ((void *) &mine, 0, 8);
[...]
which obviously is the culprit.
Adding Roger Sayle as CC as he worked on this a while ago.
--
dfranke at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |roger at eyesopen dot com
Keywords| |wrong-code
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31620
