2007-06-25 Paul Thomas <pault@gcc.gnu.org>
authorpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 25 Jun 2007 18:27:59 +0000 (18:27 +0000)
committerpault <pault@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 25 Jun 2007 18:27:59 +0000 (18:27 +0000)
commite520a5e1067185985d5f26f70ef596f6bbd5e7e8
tree7fff192c314fb9c9590eb4ed4bfd48f36a7d9f0e
parent64ba59306583301213eb4780325f942f7fdf41e6
2007-06-25  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/32464
* resolve.c (check_host_association): Return if the old symbol
is use associated.  Introduce retval to reduce the number of
evaluations of the first-order return value.

PR fortran/31494
* match.c (gfc_match_call): If a host associated symbol is not
a subroutine, build a new symtree/symbol in the current name
space.

2007-06-25  Paul Thomas  <pault@gcc.gnu.org>

PR fortran/32464
* gfortran.dg/host_assoc_function_2.f90: New test.

PR fortran/31494
* gfortran.dg/host_assoc_call_1.f90: New test.

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