[Bug fortran/66709] New: ICE on formatted io with parameter array specifier fmt

[Bug fortran/66709] New: ICE on formatted io with parameter array specifier fmt

[gerhard.steinmetz.fortran@t-online.de]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66709

            Bug ID: 66709
           Summary: ICE on formatted io with parameter array specifier fmt
           Product: gcc
           Version: 5.1.1
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gerhard.steinmetz.fortran@t-online.de
  Target Milestone: ---

Specifying a character array for fmt is legal fortran.
If declared as parameter, compilation fails :


$ cat z_wr_fmt_ice_1.f90
program p
   character(4), parameter :: fmt(1) = '(i8)'
   integer :: n
   read (*, fmt=fmt) n
   write (*, fmt=fmt) n
end


$ cat z_wr_fmt_ice_2.f90
program p
   character(*), parameter :: fmt(1) = '(i8)'
   integer :: n
   read (*, fmt=fmt) n
   write (*, fmt=fmt) n
end


$ cat z_wr_fmt_ice_5.f90
program p
   character(1), parameter :: fmt(4) = ['(', 'i', '8', ')']
   integer :: n
   read (*, fmt=fmt) n
   write (*, fmt=fmt) n
end


yields (with gfortran 5.1.1 on SUSE Linux 13.2, 64 bit) :
internal compiler error: in gfc_conv_array_constructor_expr, at
fortran/trans-expr.c:6326

[Bug fortran/66709] ICE on formatted io with parameter array specifier fmt

[gerhard.steinmetz.fortran@t-online.de]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66709

--- Comment #1 from Gerhard Steinmetz <gerhard.steinmetz.fortran@t-online.de> ---
Whereas versions without "parameter" compile and run fine :


$ cat z_wr_fmt_ice_4.f90
program p
   character(4) :: fmt(1) = '(i8)'
   integer :: n
   read (*, fmt=fmt) n
   write (*, fmt=fmt) n
end


$ cat z_wr_fmt_ice_6.f90
program p
   character(1) :: fmt(4) = ['(', 'i', '8', ')']
   integer :: n
   read (*, fmt=fmt) n
   write (*, fmt=fmt) n
end

[Bug fortran/66709] ICE on formatted io with parameter array specifier fmt

[dominiq at lps dot ens.fr]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66709

Dominique d'Humieres <dominiq at lps dot ens.fr> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2015-08-29
                 CC|                            |jvdelisle at gcc dot gnu.org
     Ever confirmed|0                           |1

--- Comment #2 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
Confirmed from 4.8 up to trunk (6.0).