* lib/gcc-dg.exp (cleanup-modules): New proc.

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

diff --git a/gcc/testsuite/gfortran.dg/nested_modules_2.f90 b/gcc/testsuite/gfortran.dg/nested_modules_2.f90
index 91ab766..3d0985a 100644 (file)
--- a/gcc/testsuite/gfortran.dg/nested_modules_2.f90
+++ b/gcc/testsuite/gfortran.dg/nested_modules_2.f90
@@ -36,3 +36,4 @@ program testfoobar
   if (all (l.ne.(/84,42,0/))) call abort ()
 end program testfoobar
 
+! { dg-final { cleanup-modules "foo bar foobar" } }