[Bug fortran/90988] New: Wrong error message with variables named "PUBLIC*"

[dominiq at lps dot ens.fr]

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

            Bug ID: 90988
           Summary: Wrong error message with variables named "PUBLIC*"
           Product: gcc
           Version: 10.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: dominiq at lps dot ens.fr
  Target Milestone: ---

Compiling the following code 

module mymod
  type :: mytyp
    integer :: i
  end type mytyp
contains
  subroutine mysub
    implicit none
    type(mytyp) :: a
    integer :: publici,publicj
    publici = a%i
    publicj = a%j
  end subroutine mysub
end module mymod

with revision r272613 gives

   11 |     publicj = a%j
      |          1
Error: PUBLIC statement at (1) is only allowed in the specification part of a
module