[Bug fortran/31620] New: Zeroing one component of array of derived types zeros the whole structure.

["David at ham dot dropbear dot id dot au" <gcc-bugzilla at gcc dot gnu dot org>]

If an array of a derived type is declared and one component is set to zero then
all the components are set to zero. The following program illustrates the
problem:

program test_assign

  type my_type
     integer :: a
     integer :: b 
  end type my_type

  type(my_type), dimension(1) :: mine

  mine%b=4

  print *, "Should be 4: ", mine%b

  mine%a=1

  print *, "Should be 4: ", mine%b

  mine%a=0

  print *, "Should be 4: ", mine%b
  print *, "Should be 0: ", mine%a

end program test_assign

The output of this is:

 Should be 4:            4
 Should be 4:            4
 Should be 4:            0
 Should be 0:            0

Note the third line.


-- 
           Summary: Zeroing one component of array of derived types zeros
                    the whole structure.
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: David at ham dot dropbear dot id dot au
 GCC build triplet: RHEL4 x86_64
  GCC host triplet: RHEL4 x86_64
GCC target triplet: RHEL4 x86_64


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31620