This is the mail archive of the gcc-bugs@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Bug fortran/47224] ICE with procedure pointer component


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

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2011.01.09 09:46:33
                 CC|                            |janus at gcc dot gnu.org
     Ever Confirmed|0                           |1

--- Comment #2 from janus at gcc dot gnu.org 2011-01-09 09:46:33 UTC ---
Confirmed. Thanks for reporting. Here is a slightly reduced/modified test case:

  abstract interface
    real function dum_vfunc ( x )
      real, dimension(:) :: x
    end function
  end interface

  type coefficients_t
    procedure (dum_vfunc), pointer, nopass :: vfunc
  end type

  type(coefficients_t) :: coeff
  real, dimension(3) :: x
  print *, abs ( coeff%vfunc ( x(:) ) )

end


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]