[Bug fortran/38765] New: [4.4, 4.3 Regression] ICE in check_host_association

["pault at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

As reported to the list by Marco Restelli:

ice-test.f90:6: internal compiler error: in check_host_association, at
fortran/resolve.c:4353
Please submit a full bug report,
with preprocessed source if appropriate.

gfortran -c ice-test.f90
ice-test.f90:6: internal compiler error: in check_host_association, at
fortran/resolve.c:4353

gfortran --version
GNU Fortran (GCC) 4.4.0 20090108 (experimental) [trunk revision 143177]
Copyright (C) 2008 Free Software Foundation, Inc.


module mod_a
 implicit none
 public :: fun
 private
contains
 pure function fun(x) result(mu)
 real, intent(in) :: x(:,:)
 real :: mu(2,2,size(x,2))
 mu = 2.0
 end function fun
end module mod_a


module mod_b
! Changing fun to fun2 in this module works.

 use mod_a, only: &
  a_fun => fun

 implicit none
 private
contains

 pure function fun(x) result(mu)
 !pure function fun2(x) result(mu)
 real, intent(in) :: x(:,:)
 real :: mu(2,2,size(x,2))

    mu = a_fun(x)

 end function fun
 !end function fun2

end module mod_b

This has an obvious solution that I will fix in the next 48 hours.

Cheers

Paul


-- 
           Summary: [4.4, 4.3 Regression] ICE in check_host_association
           Product: gcc
           Version: 4.4.0
            Status: UNCONFIRMED
          Keywords: ice-on-valid-code
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: pault at gcc dot gnu dot org
        ReportedBy: pault at gcc dot gnu dot org


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