[Bug fortran/80657] New: Loop in character function declaration

[zeccav at gmail dot com]

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

            Bug ID: 80657
           Summary: Loop in character function declaration
           Product: gcc
           Version: 7.1.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: zeccav at gmail dot com
  Target Milestone: ---

The following forces gfortran into a loop:

function f(x)
implicit character(len(f)) (x)
character(len(x)) f
end