[EMAIL PROTECTED]:~> cat t.f90
program blubb
call otherini(*998)
stop
998 stop
contains
subroutine init
call otherini(*999)
return
999 stop
end subroutine init
end program blubb
[EMAIL PROTECTED]:~> ~/src/gcc/build/stage3-gcc/f951 t.f90
MAIN__ init
t.f90:6: internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
[EMAIL PROTECTED]:~> ~/src/gcc/build/stage3-gcc/f951 --version
GNU F95 version 4.2.0 20060618 (experimental) (i686-pc-linux-gnu)
compiled by GNU C version 4.2.0 20060618 (experimental).
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
[EMAIL PROTECTED]:~>
Note that it seems necessary that the subroutine be called both from the
program and the contained procedure.
--
Summary: alternate return in contained procedure segfaults
Product: gcc
Version: unknown
Status: UNCONFIRMED
Keywords: ice-on-valid-code
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: tobi at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=28172
