! { dg-do compile }
! PR fortran/95710 - ICE on duplicate declaration of class variable
! Contributed by G.Steinmetz

module m
  interface
     module function s()
     end
  end interface
end
submodule(m) m2
contains
  module function s()
    class(*), allocatable :: x
    class(*), allocatable :: x ! { dg-error "Unclassifiable statement" }
  end
end