------- Comment #1 from janus at gcc dot gnu dot org 2009-11-11 20:38 -------
Replacing the PPC assignment by a plain pointer component assignment
IMPLICIT NONE
TYPE t
integer, pointer :: p
END TYPE t
integer :: i
TYPE(t) :: arr(2)
arr%p => i
END
is being rejected with:
arr%p => i
1
Error: Component to the right of a part reference with nonzero rank must not
have the POINTER attribute at (1)
This is C614 in the F03 standard:
C614 (R612) There shall not be more than one part-ref with nonzero rank. A
part-name to the right of a part-ref with nonzero rank shall not have the
ALLOCATABLE or POINTER attribute.
I'm not 100% sure, but I think this also applies to PPCs.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41978
