This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/24276] Components of a derived type array not passed as an array
- From: "pinskia at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 9 Jan 2006 23:24:41 -0000
- Subject: [Bug fortran/24276] Components of a derived type array not passed as an array
- References: <bug-24276-10374@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #2 from pinskia at gcc dot gnu dot org 2006-01-09 23:24 -------
the parse tree is correct:
CALL foo ((MAIN__:list(FULL) % word))
So this is just a trans issue as far as I can tell.
Also it is even worse with, were we print way wrong stuff:
program test_lex
type :: dtype
character*12 :: word
integer :: n
end type dtype
type(dtype), dimension(2) :: list
list(1) = dtype ( "one", 1)
list(2) = dtype ( "two", 2)
call foo (list%n)
contains
subroutine foo (slist)
integer, dimension(*) :: slist
print *, ("\n",slist(i), i=1,2)
end subroutine foo
end program test_lex
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=24276