This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/41706] [OOP] Calling one TBP as an actual argument of another TBP
- From: "janus at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 20 Oct 2009 11:30:21 -0000
- Subject: [Bug fortran/41706] [OOP] Calling one TBP as an actual argument of another TBP
- References: <bug-41706-16146@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #3 from janus at gcc dot gnu dot org 2009-10-20 11:30 -------
Reopening. Salvatore's code still fails with the same error, which is due to
the analogous case with a subroutine:
module m
type :: t
contains
procedure, nopass :: a
procedure, nopass :: b
end type
contains
subroutine a (x)
real :: x
print *,x
end subroutine
real function b ()
b = 3.
end function
subroutine s
class(t),allocatable :: x
real :: r
allocate(x)
call x%a(x%b()) ! fails
end subroutine
end
--
janus at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|RESOLVED |UNCONFIRMED
Resolution|FIXED |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41706