[Bug fortran/91782] New: Accepts invalid array constructor with character parameter

[gscfq@t-online.de]

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

            Bug ID: 91782
           Summary: Accepts invalid array constructor with character
                    parameter
           Product: gcc
           Version: 10.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

A parameter attribute prevents some checks in comparison to a
character variable. Affects gfortran down to at least version 5.


$ cat z1.f90
program p
   integer :: i
   character(3), parameter :: x = 'abc'
   print *, ['abc'(1:1), 'abc'(1:2), 'abc'(1:3)]
   print *, [x(1:1), x(1:2), x(1:3)]
   print *, [(x(1:i), i=1,3)]
   print *, ichar(([(x(1:i), i=1,3)]))
   print *, len_trim([(x(min(1,i):i), i=1,3)])
end


$ gfortran-10-20190915 z1.f90 && ./a.out
 aaa
 aaa
 aaa
          97          97          97
           1           1           1