[Bug fortran/65045] [4.8/4.9/5 Regression] ICE when using the same name for a block and a variable.

[dominiq at lps dot ens.fr]

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

Dominique d'Humieres <dominiq at lps dot ens.fr> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |error-recovery
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2015-02-13
                 CC|                            |tkoenig at gcc dot gnu.org
            Summary|ICE                         |[4.8/4.9/5 Regression] ICE
                   |                            |when using the same name
                   |                            |for a block and a variable.
     Ever confirmed|0                           |1

--- Comment #1 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
Revision r195570 (2013-01-30) gives the errors without ICE, r195694 gives the
ICE, likely r195684.

Note that r220452 (5.0) gives

pr65045.f90:3:6: Error: Symbol at (1) is not appropriate for an expression
pr65045.f90:5:7:

    else
       1
Error: Unexpected ELSE statement at (1)
pr65045.f90:6:6: Error: 'i' at (1) is not a variable
pr65045.f90:7:6:

    end if
      1
Error: Expecting END BLOCK statement at (1)
(null):0: confused by earlier errors, bailing out

The reduced test

real :: i = 9.9
i:block
 if (i>7.7) then
     exit i
   end if
end block i
end

gives

pr65045_db_1.f90:3.6:

 if (i>7.7) then
      1
Error: Symbol at (1) is not appropriate for an expression
pr65045_db_1.f90:7.6:

   end if
      1
Error: Expecting END BLOCK statement at (1)
f951: internal compiler error: Segmentation fault: 11