diff options
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/wunused-parameter_2.f90 | 13 |
2 files changed, 18 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index e704b90..5004a5e 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2019-02-07 Dominique d'Humieres <dominiq@gcc.gnu.org> + + PR fortran/52789 + * gfortran.dg/wunused-parameter_2.f90: New test. + 2019-02-07 Matthew Malcomson <matthew.malcomson@arm.com> * gcc.dg/rtl/arm/ldrd-peepholes.c: Only run on arm diff --git a/gcc/testsuite/gfortran.dg/wunused-parameter_2.f90 b/gcc/testsuite/gfortran.dg/wunused-parameter_2.f90 new file mode 100644 index 0000000..f627461 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/wunused-parameter_2.f90 @@ -0,0 +1,13 @@ +! { dg-do compile } +! { dg-options "-Wunused-parameter -Wunused-dummy-argument" } +! +! PR fortran/52789 +! +! Contributed by Mat Cross +! +! Check for unused parameter and dummy argument +! + +subroutine s(x) ! { dg-warning "Unused dummy argument" } +integer, parameter :: i = 0 ! { dg-warning "Unused parameter" } +end |