[Bug fortran/31720] New: ICE for module function returning automatic array

["terry at chem dot gu dot se" <gcc-bugzilla at gcc dot gnu dot org>]

[tjf@fkpc167 Bug]$ cat acmod.f90 
module AMod
implicit none
integer::i
contains
function f() result (s)
real(kind=8),dimension(i)::s
end function f
end module
[tjf@fkpc167 Bug]$ gfortran -c acmod.f90 
[tjf@fkpc167 Bug]$ cat nnh.f90 
program fred
use AMod
implicit none
write(*,*)f()
end
[tjf@fkpc167 Bug]$ gfortran -v -c nnh.f90 
Using built-in specs.
Target: x86_64-unknown-linux-gnu
Configured with: ./configure --disable-multilib --enable-languages=fortran
Thread model: posix
gcc version 4.2.0 20070228 (prerelease)
 /usr/local/libexec/gcc/x86_64-unknown-linux-gnu/4.2.0/f951 nnh.f90 -quiet
-dumpbase nnh.f90 -mtune=generic -auxbase nnh -version -I
/usr/local/lib/gcc/x86_64-unknown-linux-gnu/4.2.0/finclude -o /tmp/ccpjANyk.s
GNU F95 version 4.2.0 20070228 (prerelease) (x86_64-unknown-linux-gnu)
        compiled by GNU C version 4.2.0 20070228 (prerelease).
GGC heuristics: --param ggc-min-expand=89 --param ggc-min-heapsize=112046
nnh.f90: In function ?MAIN__?:
nnh.f90:1: internal compiler error: in gfc_get_symbol_decl, at
fortran/trans-decl.c:863
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.


I have not tried this with a more up to date gfortran.


-- 
           Summary: ICE for module function returning automatic array
           Product: gcc
           Version: 4.2.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: terry at chem dot gu dot se
  GCC host triplet: x86_64-unknown-linux-gnu


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