[PATCH, testsuite]: Commited: Fix wrong dg directive in fortran tests

[Uros Bizjak]

Hello!

This patch fixes a thinko in gfortran.dg/use_[567].f90 test files.
Patch is committed to mainline SVN.

2007-03-26  Uros Bizjak  <ubizjak@gmail.com>

        * gfortran.dg/use_[567].f90: Use correct cleanup-modules dg directive.

BTW: It would be nice if fortran tests cleaned all their stuff from
test execute directory. There is still lots of junk left there at the
end of test run.

Uros.

Index: gfortran.dg/use_6.f90
===================================================================
--- gfortran.dg/use_6.f90       (revision 123155)
+++ gfortran.dg/use_6.f90       (working copy)
@@ -42,4 +42,4 @@
 use z
 end

-! { dg-final { cleanup-tree-dump "x y z" } }
+! { dg-final { cleanup-modules "x y z" } }
Index: gfortran.dg/use_7.f90
===================================================================
--- gfortran.dg/use_7.f90       (revision 123155)
+++ gfortran.dg/use_7.f90       (working copy)
@@ -46,4 +46,4 @@
 use y, operator(+) => operator(.addfive.) ! { dg-error "Syntax error
in USE statement" }
 end

-! { dg-final { cleanup-tree-dump "x y z" } }
+! { dg-final { cleanup-modules "x y z" } }
Index: gfortran.dg/use_5.f90
===================================================================
--- gfortran.dg/use_5.f90       (revision 123155)
+++ gfortran.dg/use_5.f90       (working copy)
@@ -46,4 +46,4 @@
  if ((.addfive. i) /= 2+5) call abort ()
 end

-! { dg-final { cleanup-tree-dump "x y z" } }
+! { dg-final { cleanup-modules "x y z" } }