This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/60593] ICE with deferred length variable in FORALL
- From: "sgk at troutmask dot apl.washington.edu" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: Wed, 19 Mar 2014 18:10:07 +0000
- Subject: [Bug fortran/60593] ICE with deferred length variable in FORALL
- Auto-submitted: auto-generated
- References: <bug-60593-4 at http dot gcc dot gnu dot org/bugzilla/>
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60593
--- Comment #4 from Steve Kargl <sgk at troutmask dot apl.washington.edu> ---
On Wed, Mar 19, 2014 at 06:01:14PM +0000, dominiq at lps dot ens.fr wrote:
>
> --- Comment #3 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
> It looks similar to the ICE reported in pr51976 comment 8, although the ICEs
> are different.
>
It does look similar. Perhaps, janus patch has simply moved
the issue to a new location.
A farther reduced test case without the pointer assignment.
function C2FChar(j, s) result(res)
implicit none
integer, intent(in) :: j
character(len=:), pointer, intent(in) :: s
character(len=:), allocatable :: res
integer i
allocate(character(j) :: res)
forall (i = 1:j) res(i:i) = s(i:i)
end function