------- Comment #1 from burnus at gcc dot gnu dot org  2008-09-19 08:18 -------
Not only as actual argument also as direct procedure call, gfortran misses the
recursive call to ENTRY:

subroutine sub()
  return
entry glocal()
  call glocal () ! << wrong: Recursive call
end subroutine

And a simplified program to let it ICE is:

recursive subroutine sub()
  call glocal () ! << \
  return         !     > ICE
entry glocal()   ! << /
end subroutine


-- 


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

Reply via email to