! { dg-do compile }
! { dg-options "-std=f95" }
! PR fortran/107559 - ICE in resolve_equivalence
! Contributed by G.Steinmetz

module m
  implicit none
  integer, protected :: a ! { dg-error "Fortran 2003: PROTECTED attribute" }
  integer :: b
  equivalence (a, b)      ! { dg-error "has no IMPLICIT type" }
end