2011-08-04 Mikael Morin <mikael.morin@sfr.fr>

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / namelist_52.f90

diff --git a/gcc/testsuite/gfortran.dg/namelist_52.f90 b/gcc/testsuite/gfortran.dg/namelist_52.f90
index 6e31382..253bd3f 100644 (file)
--- a/gcc/testsuite/gfortran.dg/namelist_52.f90
+++ b/gcc/testsuite/gfortran.dg/namelist_52.f90
@@ -30,3 +30,5 @@ read(31,nml=info_adjoint)
 if (adjoint%solver_type /= 'direct') call abort
 if (adjoint%screen_io_fs_ntime%begin /= 42) call abort
 end program gfortran_error_2
+
+! { dg-final { cleanup-modules "mod1" } }