[Bug fortran/84218] ICE in free_expr0, at fortran/expr.c:451

2018-03-05 Thread dominiq at lps dot ens.fr 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=84218

Dominique d'Humieres  changed:

   What|Removed |Added

 Status|NEW |RESOLVED
 Resolution|--- |FIXED

--- Comment #5 from Dominique d'Humieres  ---
> The implied do variants z1, z2, and z3 are now rejected,
> probably by Steve's recent patch.
>
> z4 is fine.
>
> Is there anything left, or can this PR be closed?

Confirmed, closing as FIXED.

[Bug fortran/84218] ICE in free_expr0, at fortran/expr.c:451

2018-03-05 Thread anlauf at gmx dot de 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=84218

Harald Anlauf  changed:

   What|Removed |Added

 CC||anlauf at gmx dot de

--- Comment #4 from Harald Anlauf  ---
The implied do variants z1, z2, and z3 are now rejected,
probably by Steve's recent patch.

z4 is fine.

Is there anything left, or can this PR be closed?

[Bug fortran/84218] ICE in free_expr0, at fortran/expr.c:451

2018-02-14 Thread gs...@t-online.de 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=84218

--- Comment #3 from G. Steinmetz  ---

Some working variants/extentions with substring "x(i:i)" :


$ cat z2.f90
program p
   integer :: i
   character(3) :: x
   data (x(i:i), i=1,3) /'a', 'b', 'c'/
   print *, x
end

$ gfortran-8-20180211 z2.f90 -static-libgfortran
$ a.out
 abc


$ cat z3.f90
program p
   integer :: i
   character(3) :: x
   data (x(i:i), i=1,3) /3*'a'/
   print *, x
end

$ gfortran-8-20180211 z3.f90 -static-libgfortran
$ a.out
 aaa


$ cat z4.f90
program p
   character(3) :: x
   data x(1:1), x(2:2), x(3:3) /'a', 'b', 'c'/
   print *, x
end

$ gfortran-8-20180211 z4.f90 -static-libgfortran
$ a.out
 abc

[Bug fortran/84218] ICE in free_expr0, at fortran/expr.c:451

2018-02-07 Thread neil.n.carlson at gmail dot com 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=84218

Neil Carlson  changed:

   What|Removed |Added

 CC||neil.n.carlson at gmail dot com

--- Comment #2 from Neil Carlson  ---
Note that the DATA statement

   data (x(j:i), i=1,2,2) /'a'/

is not valid Fortran.  Implied do objects, here x(j:i), are restricted by R538
(F08) to array elements, scalar structure component, or an implied-do.  x(j:i)
is an array section not an array element.  But this may be a language extension
that gfortran supports.

[Bug fortran/84218] ICE in free_expr0, at fortran/expr.c:451

2018-02-05 Thread marxin at gcc dot gnu.org 
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=84218

Martin Liška  changed:

   What|Removed |Added

   Keywords||ice-on-invalid-code
 Status|UNCONFIRMED |NEW
   Last reconfirmed||2018-02-05
 CC||marxin at gcc dot gnu.org
Summary|[8 Regression] ICE in   |ICE in free_expr0, at
   |free_expr0, at  |fortran/expr.c:451
   |fortran/expr.c:451  |
 Ever confirmed|0   |1

--- Comment #1 from Martin Liška  ---
Confirmed, I see the ICE for all releases I have (4.5.0+).