[Bug fortran/104812] New: Construct-name with same variable name in scope

[fruitclover at gmail dot com via Gcc-bugs]

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

            Bug ID: 104812
           Summary: Construct-name with same variable name in scope
           Product: gcc
           Version: 11.2.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: fruitclover at gmail dot com
  Target Milestone: ---

Is this expected behavior for s1 to disallow construct-name with the same name
as declared variable? 

$ cat -n test.f90
     1  subroutine s1
     2    logical :: x
     3    x: if (x) then
     4    end if x
     5  end
     6  
     7  subroutine s2
     8    logical :: x
     9    x: block
    10    end block x
    11  end

$ gfortran test.f90 -fsyntax-only -Wall -Wextra
test.f90:3:11:

    3 |   x: if (x) then
      |           1
Error: Symbol at (1) is not appropriate for an expression
test.f90:4:5:

    4 |   end if x
      |     1
Error: Expecting END SUBROUTINE statement at (1)