[Bug fortran/69963] New: ICE out of memory on displaced implicit character

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

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

            Bug ID: 69963
           Summary: ICE out of memory on displaced implicit character
           Product: gcc
           Version: 6.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gerhard.steinmetz.fortran@t-online.de
  Target Milestone: ---

Something goes wrong when a "implicit character" statement is mixed in
at wrong places. There is NO ice, NO out of memory if "implicit none"
or "implicit real" etc. is mixed in instead.

In most runs "out of memory" hits, but segfault or other error messages
are possible too, depending on compile options and additional statements.



$ cat z01.f90
program p
   character(4) c
   implicit character(8) (a-z)
end


$ cat z02.f90
program p
   x = 1
   implicit character(8) (a-z)
end


$ cat z03.f90
module m
   private
   implicit character(8) (a-z)
end


$ gfortran-6 -c z01.f90
f951: out of memory allocating 22352811504 bytes after a total of 634880 bytes


$ gfortran-6 -c z02.f90
f951: out of memory allocating 22352811504 bytes after a total of 634880 bytes


$ gfortran-6 -c z03.f90
f951: out of memory allocating 22352811504 bytes after a total of 634880 bytes


Please find attached a list with several more examples.