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: "Thomas dot Koenig at online dot de" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 4 Jan 2005 13:41:25 -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 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