[Bug fortran/17379] Generic functions not resolved

[CARendleman at lbl dot gov]

------- 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