Subversion Repositories openrisc

! { dg-do compile }
! { dg-options "-Wunused-parameter" }
!
! PR fortran/31461
!
module util_mod
  integer, parameter :: i = 4
end module util_mod

program main
    use util_mod, only: i ! { dg-warning "Unused parameter .i. which has been explicitly imported" }
    integer, parameter :: j = 4 ! { dg-warning "Unused parameter .j. declared at" }
end program main

! { dg-final { cleanup-modules "util_mod" } }