This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
Re: [Fortran, committed] Fix PR fortran/30683
Steve Kargl wrote:
On Wed, Feb 14, 2007 at 01:37:43AM -0800, Brooks Moses wrote:
! { dg-do compile }
! PR fortran/30683
! Code contributed by Salvatore Filippone.
!
module class_fld
integer, parameter :: int_ = 1
integer, parameter :: bnd_ = 2
type fld
integer :: size(2)
end type fld
!
! This interface is renaming the SIZE intrinsic procedure,
! which led to a segmentation fault when trying to resolve
! the intrinsic symbol name.
!
interface size
module procedure get_fld_size
end interface
A quibble with the comment: This isn't renaming the SIZE intrinsic
procedure at all; it's extending it (or, alternately, overloading it).
Feel free to change the comment.
Heh, ok, point. :) Committed as obvious, after testing:
----------------------------------------------------------------------
2007-02-14 Brooks Moses <brooks.moses@codesourcery.com>
* gfortran.dg/interface_10.f90: Fix comment typo.
----------------------------------------------------------------------
- Brooks
Index: gfortran.dg/interface_10.f90
===================================================================
--- gfortran.dg/interface_10.f90 (revision 121792)
+++ gfortran.dg/interface_10.f90 (working copy)
@@ -9,7 +9,7 @@
integer :: size(2)
end type fld
!
- ! This interface is renaming the SIZE intrinsic procedure,
+ ! This interface is extending the SIZE intrinsic procedure,
! which led to a segmentation fault when trying to resolve
! the intrinsic symbol name.
!