This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
PR 44434
- From: Salvatore Filippone <salvatore dot filippone at uniroma2 dot it>
- To: fortran at gcc dot gnu dot org
- Cc: Janus Weil <janus at gcc dot gnu dot org>
- Date: Sun, 06 Jun 2010 14:07:11 +0200
- Subject: PR 44434
- Reply-to: salvatore dot filippone at uniroma2 dot it
Hi folks,
I have just opened the subject PR; what I am not 100% sure about is
whether it's valid or invalid code:
-------------------------------------------------------------
subroutine test(a,ires,info)
use d_mat_mod
class(d_mat) :: a
integer :: ires,info
select type ( aa => a%a)
type is( d_xxx_mat)
ires = aa%nnz
class default
call a%a%csget(ires,info)
! call aa%csget(ires,info) ! With this line compiles cleanly
end select
end subroutine test
----------------------------------------------------------
XLF and NAG both accept the code that throws GFORTRAN into ICE; I
suspect it should be legal. Full code in bugzilla unde the PR
Regards
Salvatore