gcc/testsuite/gfortran.dg/warn_unused_var_3.f90

   1 ! { dg-do compile }
   2 ! { dg-options "-Wunused-parameter" }
   3 !
   4 ! PR fortran/31461
   5 !
   6 module util_mod
   7   integer, parameter :: i = 4
   8 end module util_mod
   9
  10 program main
  11     use util_mod, only: i ! { dg-warning "Unused parameter .i. which has been explicitly imported" }
  12     integer, parameter :: j = 4 ! { dg-warning "Unused parameter .j. declared at" }
  13 end program main