[Bug fortran/54107] [4.8 Regression] [F03] Memory hog with abstract interface

[janus at gcc dot gnu.org]

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

--- Comment #25 from janus at gcc dot gnu.org 2013-01-28 16:04:14 UTC ---
(In reply to comment #24)
> > Draft patch for comment #4, to be tested.
> 
> Thanks! Seems to work on comment 4 at least. I'll try a regtest.

Regtest went through cleanly, and it also works well for an 'indirect' case
like this:


contains

  subroutine s1 (arg1)
    procedure(s2) :: arg1
  end subroutine

  subroutine s2 (arg2)
    procedure(s1) :: arg2
  end subroutine

end