This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/17379] Generic functions not resolved
- From: "CARendleman at lbl dot gov" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 5 Jan 2005 18:14:29 -0000
- Subject: [Bug fortran/17379] Generic functions not resolved
- References: <20040909162101.17379.CARendleman@lbl.gov>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Additional Comments From CARendleman at lbl dot gov 2005-01-05 18:14 -------
Subject: Re: Generic functions not resolved
I'm sure your not offering this as a 'fix' because it results in
'conflicting attributes or multiple declarations of a name'
or 'name already used as generic name' errors with other compilers.
Thomas dot Koenig at online dot de wrote:
>------- Additional Comments From Thomas dot Koenig at online dot de 2005-01-04 13:41 -------
>The problem appears to be related to the fact that "length"
>and "size" are both intrinsics.
>
>If you declare "length" to be external, with the following
>patch:
>
>$ diff -u vec3d.f90 vec3d-works.f90
>--- vec3d.f90 2005-01-04 14:43:07.000000000 +0100
>+++ vec3d-works.f90 2005-01-04 14:43:01.000000000 +0100
>@@ -5,6 +5,7 @@
> ! Public procedures
> private
> public :: normalise, length
>+ external :: length
>
> ! Module constants
> integer, parameter :: SP = selected_real_kind(6)
>
>compilation works fine.
>
>
>
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17379