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" } }