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

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

diff --git a/gcc/testsuite/gfortran.dg/auto_char_len_3.f90 b/gcc/testsuite/gfortran.dg/auto_char_len_3.f90
index b941511..da8cf5e 100644 (file)
--- a/gcc/testsuite/gfortran.dg/auto_char_len_3.f90
+++ b/gcc/testsuite/gfortran.dg/auto_char_len_3.f90
@@ -23,3 +23,5 @@ program TestStringTools
   if (txt .ne. "AaBbCcDdEeFfGgHhIiJjKkLlMmNnOoPpQqRrSsTtUuVvWwXxYyZz") &
         call abort ()
 end program TestStringTools
+
+! { dg-final { cleanup-modules "chtest" } }