[Bug fortran/60526] New: [4.7/4.8/4.9 Regression] Accepts-invalid: Variable name same as type name

[janus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=60526

            Bug ID: 60526
           Summary: [4.7/4.8/4.9 Regression] Accepts-invalid: Variable
                    name same as type name
           Product: gcc
           Version: 4.9.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: janus at gcc dot gnu.org

The following program is supposed to be invalid:

type X
end type

type(X) :: X

end


4.6 rejects it with:

type(X) :: X
            1
Error: Symbol 'x' at (1) cannot have a type


4.7, 4.8 and trunk however accept it happily. I think that is yet another
regression caused by the constructor implementation in 4.7.