[Bug fortran/47352] [F03] ICE with proc-pointers in generic procedures

[janus at gcc dot gnu.org]

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

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2011.01.18 23:39:08
            Summary|ICE with proc-pointers in   |[F03] ICE with
                   |generic procedures          |proc-pointers in generic
                   |                            |procedures
     Ever Confirmed|0                           |1

--- Comment #1 from janus at gcc dot gnu.org 2011-01-18 23:39:08 UTC ---
Confirmed. Note: The ICE already happens with a simple PROCEDURE statement
without the POINTER attribute:


   implicit none

   abstract interface
      real function f()
      end function f
   end interface

   procedure(f) :: f1

   interface gen
      procedure f1
   end interface gen

   write(*,*) gen()    ! ICE
end


At first I was not quite sure if the code in comment #0 is valid, but F08
chapter 12.4.3.4.1 explicitly lists procedure pointers as being allowed in a
generic interface.