diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/c_by_val_5.f90')
-rw-r--r-- | gcc/testsuite/gfortran.dg/c_by_val_5.f90 | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/gcc/testsuite/gfortran.dg/c_by_val_5.f90 b/gcc/testsuite/gfortran.dg/c_by_val_5.f90 index 90ef299aa9..3a8bc3bf75 100644 --- a/gcc/testsuite/gfortran.dg/c_by_val_5.f90 +++ b/gcc/testsuite/gfortran.dg/c_by_val_5.f90 @@ -23,7 +23,7 @@ module x ! "external" only. interface subroutine bmp_write(nx) - integer :: nx + integer, value :: nx end subroutine bmp_write end interface contains @@ -65,5 +65,3 @@ program main call Grid2BMP(10) ! call test() end program main - -! { dg-final { cleanup-modules "x" } } |