public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/17379] New: Generic functions not resolved
@ 2004-09-09 16:21 CARendleman at lbl dot gov
2004-09-09 17:02 ` [Bug fortran/17379] " pinskia at gcc dot gnu dot org
` (11 more replies)
0 siblings, 12 replies; 13+ messages in thread
From: CARendleman at lbl dot gov @ 2004-09-09 16:21 UTC (permalink / raw)
To: gcc-bugs
$ cat generic_bug.f90
module vector_i_module
implicit none
type vector_i
integer :: size = 0
end type vector_i
interface size
module procedure vector_size_i
end interface size
contains
function vector_size_i(d) result(r)
integer :: r
type(vector_i), intent(in) :: d
r = d%size
end function vector_size_i
subroutine vector_reverse_i(d)
type(vector_i), intent(inout) :: d
integer :: i,n
n = size(d)
end subroutine vector_reverse_i
end module vector_i_module
$ gfortran generic_bug.f90
In file generic_bug.f90:24
n = size(d)
1
Error: Symbol 'size' at (1) has no IMPLICIT type
--
Summary: Generic functions not resolved
Product: gcc
Version: 3.5.0
Status: UNCONFIRMED
Severity: critical
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: CARendleman at lbl dot gov
CC: gcc-bugs at gcc dot gnu dot org
GCC build triplet: GNU Fortran 95 (GCC 3.5.0 20040909 (experimental))
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17379
^ permalink raw reply [flat|nested] 13+ messages in thread
* [Bug fortran/17379] Generic functions not resolved
2004-09-09 16:21 [Bug fortran/17379] New: Generic functions not resolved CARendleman at lbl dot gov
@ 2004-09-09 17:02 ` pinskia at gcc dot gnu dot org
2004-09-18 11:26 ` tobi at gcc dot gnu dot org
` (10 subsequent siblings)
11 siblings, 0 replies; 13+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-09-09 17:02 UTC (permalink / raw)
To: gcc-bugs
--
What |Removed |Added
----------------------------------------------------------------------------
Severity|critical |normal
GCC build triplet|GNU Fortran 95 (GCC 3.5.0 |
|20040909 (experimental)) |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17379
^ permalink raw reply [flat|nested] 13+ messages in thread
* [Bug fortran/17379] Generic functions not resolved
2004-09-09 16:21 [Bug fortran/17379] New: Generic functions not resolved CARendleman at lbl dot gov
2004-09-09 17:02 ` [Bug fortran/17379] " pinskia at gcc dot gnu dot org
@ 2004-09-18 11:26 ` tobi at gcc dot gnu dot org
2004-09-23 19:43 ` tobi at gcc dot gnu dot org
` (9 subsequent siblings)
11 siblings, 0 replies; 13+ messages in thread
From: tobi at gcc dot gnu dot org @ 2004-09-18 11:26 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From tobi at gcc dot gnu dot org 2004-09-18 11:25 -------
Confirmed. It looks like an issue with setting up sibling namespaces, but I
haven't looked at what the compiler actually does.
--
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever Confirmed| |1
Last reconfirmed|0000-00-00 00:00:00 |2004-09-18 11:26:00
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17379
^ permalink raw reply [flat|nested] 13+ messages in thread
* [Bug fortran/17379] Generic functions not resolved
2004-09-09 16:21 [Bug fortran/17379] New: Generic functions not resolved CARendleman at lbl dot gov
2004-09-09 17:02 ` [Bug fortran/17379] " pinskia at gcc dot gnu dot org
2004-09-18 11:26 ` tobi at gcc dot gnu dot org
@ 2004-09-23 19:43 ` tobi at gcc dot gnu dot org
2004-09-23 19:44 ` tobi at gcc dot gnu dot org
` (8 subsequent siblings)
11 siblings, 0 replies; 13+ messages in thread
From: tobi at gcc dot gnu dot org @ 2004-09-23 19:43 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From tobi at gcc dot gnu dot org 2004-09-23 19:43 -------
*** This bug has been marked as a duplicate of 16940 ***
--
What |Removed |Added
----------------------------------------------------------------------------
Status|NEW |RESOLVED
Resolution| |DUPLICATE
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17379
^ permalink raw reply [flat|nested] 13+ messages in thread
* [Bug fortran/17379] Generic functions not resolved
2004-09-09 16:21 [Bug fortran/17379] New: Generic functions not resolved CARendleman at lbl dot gov
` (2 preceding siblings ...)
2004-09-23 19:43 ` tobi at gcc dot gnu dot org
@ 2004-09-23 19:44 ` tobi at gcc dot gnu dot org
2004-09-23 19:46 ` tobi at gcc dot gnu dot org
` (7 subsequent siblings)
11 siblings, 0 replies; 13+ messages in thread
From: tobi at gcc dot gnu dot org @ 2004-09-23 19:44 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From tobi at gcc dot gnu dot org 2004-09-23 19:44 -------
Well, I think duplicate is to harsh. The relationship is more likely a
dependency, there might be additional issues lurking.
--
What |Removed |Added
----------------------------------------------------------------------------
BugsThisDependsOn| |16940
Status|RESOLVED |REOPENED
Resolution|DUPLICATE |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17379
^ permalink raw reply [flat|nested] 13+ messages in thread
* [Bug fortran/17379] Generic functions not resolved
2004-09-09 16:21 [Bug fortran/17379] New: Generic functions not resolved CARendleman at lbl dot gov
` (3 preceding siblings ...)
2004-09-23 19:44 ` tobi at gcc dot gnu dot org
@ 2004-09-23 19:46 ` tobi at gcc dot gnu dot org
2004-09-23 20:10 ` pinskia at gcc dot gnu dot org
` (6 subsequent siblings)
11 siblings, 0 replies; 13+ messages in thread
From: tobi at gcc dot gnu dot org @ 2004-09-23 19:46 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From tobi at gcc dot gnu dot org 2004-09-23 19:46 -------
*** Bug 17630 has been marked as a duplicate of this bug. ***
--
What |Removed |Added
----------------------------------------------------------------------------
CC| |giannozz at nest dot sns dot
| |it
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17379
^ permalink raw reply [flat|nested] 13+ messages in thread
* [Bug fortran/17379] Generic functions not resolved
2004-09-09 16:21 [Bug fortran/17379] New: Generic functions not resolved CARendleman at lbl dot gov
` (4 preceding siblings ...)
2004-09-23 19:46 ` tobi at gcc dot gnu dot org
@ 2004-09-23 20:10 ` pinskia at gcc dot gnu dot org
2004-09-27 10:49 ` matthew dot amos at baesystems dot com
` (5 subsequent siblings)
11 siblings, 0 replies; 13+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2004-09-23 20:10 UTC (permalink / raw)
To: gcc-bugs
--
What |Removed |Added
----------------------------------------------------------------------------
Status|REOPENED |NEW
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17379
^ permalink raw reply [flat|nested] 13+ messages in thread
* [Bug fortran/17379] Generic functions not resolved
2004-09-09 16:21 [Bug fortran/17379] New: Generic functions not resolved CARendleman at lbl dot gov
` (5 preceding siblings ...)
2004-09-23 20:10 ` pinskia at gcc dot gnu dot org
@ 2004-09-27 10:49 ` matthew dot amos at baesystems dot com
2005-01-04 13:41 ` Thomas dot Koenig at online dot de
` (4 subsequent siblings)
11 siblings, 0 replies; 13+ messages in thread
From: matthew dot amos at baesystems dot com @ 2004-09-27 10:49 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From matthew dot amos at baesystems dot com 2004-09-27 10:49 -------
I have some code which triggers the same bug (I think). If it helps, I have
reproduced the code here. The funny thing is; it works if you replace "length"
with "length_R4" in normalise_R4.
module module_vec3d
implicit none
! Public procedures
private
public :: normalise, length
! Module constants
integer, parameter :: SP = selected_real_kind(6)
integer, parameter :: DP = selected_real_kind(12)
! Vector length
INTERFACE length
MODULE PROCEDURE length_R4
END INTERFACE
! Vector normalise
INTERFACE normalise
MODULE PROCEDURE normalise_R4
END INTERFACE
CONTAINS
FUNCTION length_R4 (x) result (y)
real(SP) :: y
real(SP), intent(in) :: x(3)
y = sqrt(x(1)**2 + x(2)**2 + x(3)**2)
END FUNCTION length_R4
FUNCTION normalise_R4 (x) result (y)
real(SP) :: y(3)
real(SP), intent(in) :: x(3)
y = x / length(x)
END FUNCTION normalise_R4
END MODULE module_vec3d
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17379
^ permalink raw reply [flat|nested] 13+ messages in thread
* [Bug fortran/17379] Generic functions not resolved
2004-09-09 16:21 [Bug fortran/17379] New: Generic functions not resolved CARendleman at lbl dot gov
` (6 preceding siblings ...)
2004-09-27 10:49 ` matthew dot amos at baesystems dot com
@ 2005-01-04 13:41 ` Thomas dot Koenig at online dot de
2005-01-05 18:14 ` CARendleman at lbl dot gov
` (3 subsequent siblings)
11 siblings, 0 replies; 13+ messages in thread
From: Thomas dot Koenig at online dot de @ 2005-01-04 13:41 UTC (permalink / raw)
To: gcc-bugs
------- 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
^ permalink raw reply [flat|nested] 13+ messages in thread
* [Bug fortran/17379] Generic functions not resolved
2004-09-09 16:21 [Bug fortran/17379] New: Generic functions not resolved CARendleman at lbl dot gov
` (7 preceding siblings ...)
2005-01-04 13:41 ` Thomas dot Koenig at online dot de
@ 2005-01-05 18:14 ` CARendleman at lbl dot gov
2005-07-22 19:15 ` paulthomas2 at wanadoo dot fr
` (2 subsequent siblings)
11 siblings, 0 replies; 13+ messages in thread
From: CARendleman at lbl dot gov @ 2005-01-05 18:14 UTC (permalink / raw)
To: gcc-bugs
------- 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
^ permalink raw reply [flat|nested] 13+ messages in thread
* [Bug fortran/17379] Generic functions not resolved
2004-09-09 16:21 [Bug fortran/17379] New: Generic functions not resolved CARendleman at lbl dot gov
` (8 preceding siblings ...)
2005-01-05 18:14 ` CARendleman at lbl dot gov
@ 2005-07-22 19:15 ` paulthomas2 at wanadoo dot fr
2005-08-12 21:47 ` tkoenig at gcc dot gnu dot org
2005-08-23 1:54 ` pinskia at gcc dot gnu dot org
11 siblings, 0 replies; 13+ messages in thread
From: paulthomas2 at wanadoo dot fr @ 2005-07-22 19:15 UTC (permalink / raw)
To: gcc-bugs
--
Bug 17379 depends on bug 16940, which changed state.
Bug 16940 Summary: Failure to perform host association correctly
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=16940
What |Old Value |New Value
----------------------------------------------------------------------------
Status|NEW |RESOLVED
Resolution| |FIXED
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17379
^ permalink raw reply [flat|nested] 13+ messages in thread
* [Bug fortran/17379] Generic functions not resolved
2004-09-09 16:21 [Bug fortran/17379] New: Generic functions not resolved CARendleman at lbl dot gov
` (9 preceding siblings ...)
2005-07-22 19:15 ` paulthomas2 at wanadoo dot fr
@ 2005-08-12 21:47 ` tkoenig at gcc dot gnu dot org
2005-08-23 1:54 ` pinskia at gcc dot gnu dot org
11 siblings, 0 replies; 13+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2005-08-12 21:47 UTC (permalink / raw)
To: gcc-bugs
------- Additional Comments From tkoenig at gcc dot gnu dot org 2005-08-12 21:47 -------
This is fixed on mainline and on 4.0.
--
What |Removed |Added
----------------------------------------------------------------------------
Status|NEW |RESOLVED
Resolution| |FIXED
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17379
^ permalink raw reply [flat|nested] 13+ messages in thread
* [Bug fortran/17379] Generic functions not resolved
2004-09-09 16:21 [Bug fortran/17379] New: Generic functions not resolved CARendleman at lbl dot gov
` (10 preceding siblings ...)
2005-08-12 21:47 ` tkoenig at gcc dot gnu dot org
@ 2005-08-23 1:54 ` pinskia at gcc dot gnu dot org
11 siblings, 0 replies; 13+ messages in thread
From: pinskia at gcc dot gnu dot org @ 2005-08-23 1:54 UTC (permalink / raw)
To: gcc-bugs
--
What |Removed |Added
----------------------------------------------------------------------------
Target Milestone|--- |4.0.2
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=17379
^ permalink raw reply [flat|nested] 13+ messages in thread
end of thread, other threads:[~2005-08-23 1:54 UTC | newest]
Thread overview: 13+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2004-09-09 16:21 [Bug fortran/17379] New: Generic functions not resolved CARendleman at lbl dot gov
2004-09-09 17:02 ` [Bug fortran/17379] " pinskia at gcc dot gnu dot org
2004-09-18 11:26 ` tobi at gcc dot gnu dot org
2004-09-23 19:43 ` tobi at gcc dot gnu dot org
2004-09-23 19:44 ` tobi at gcc dot gnu dot org
2004-09-23 19:46 ` tobi at gcc dot gnu dot org
2004-09-23 20:10 ` pinskia at gcc dot gnu dot org
2004-09-27 10:49 ` matthew dot amos at baesystems dot com
2005-01-04 13:41 ` Thomas dot Koenig at online dot de
2005-01-05 18:14 ` CARendleman at lbl dot gov
2005-07-22 19:15 ` paulthomas2 at wanadoo dot fr
2005-08-12 21:47 ` tkoenig at gcc dot gnu dot org
2005-08-23 1:54 ` pinskia at gcc dot gnu dot org
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).