BLOCK is xfailed and contains:
! Check for correct scope of variables that are implicit typed within a BLOCK. ! This is not yet implemented, thus XFAIL'ed the test. PROGRAM main IMPLICIT INTEGER(a-z) BLOCK ! a gets implicitly typed, but scope should not be limited to BLOCK. a = 42 END BLOCK ! Here, we should still access the same a that was set above. IF (a /= 42) CALL abort () END PROGRAM main -- Summary: [F2008] BLOCK (block_6.f08): Scope of implicitly typed variables Product: gcc Version: 4.5.0 Status: UNCONFIRMED Keywords: wrong-code Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: burnus at gcc dot gnu dot org http://gcc.gnu.org/bugzilla/show_bug.cgi?id=43019