OSDN Git Service

2007-05-31 Paul Thomas <pault@gcc.gnu.org>
authorpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 31 May 2007 07:45:50 +0000 (07:45 +0000)
committerpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 31 May 2007 07:45:50 +0000 (07:45 +0000)
commit18ef5955099014622246796de686e2cbcb9e8bec
treedc1bbff7211de77af13ec23b2603163f0d6606c0
parent796f6ddf517349e46196845a0d9ce5322495c4d0
2007-05-31  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/32103
* module.c (mio_symtree_ref): If an equivalence group member
is not used, give it a hidden symbol and set the pointer_info.
(load_equiv): Only free the equivalence if none of the members
are used.

2007-05-31  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/32103
* gfortran.dg/module_equivalence_3.f90: New test.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@125216 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/module.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/module_equivalence_3.f90 [new file with mode: 0644]