From: Tobias Burnus <burnus@net-b.de>
Date: Tue, 27 May 2008 19:31:36 +0000 (+0200)
Subject: assignment_3.f90: Add missing cleanup-modules.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=61bed51903da5de082dd2272d9aa99d83b1b4c56;p=gcc.git

assignment_3.f90: Add missing cleanup-modules.

2008-05-27  Tobias Burnus  <burnus@net-b.de>

        * gfortran.dg/assignment_3.f90: Add missing cleanup-modules.

From-SVN: r136053
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 556d76eae02..4983df2ee5c 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2008-05-27  Tobias Burnus  <burnus@net-b.de>
+
+	* gfortran.dg/assignment_3.f90: Add missing cleanup-modules.
+
 2008-05-27  Tobias Burnus  <burnus@net-b.de>
 
 	PR fortran/36316
diff --git a/gcc/testsuite/gfortran.dg/assignment_3.f90 b/gcc/testsuite/gfortran.dg/assignment_3.f90
index d843c3200cb..cdaaa8c5a4f 100644
--- a/gcc/testsuite/gfortran.dg/assignment_3.f90
+++ b/gcc/testsuite/gfortran.dg/assignment_3.f90
@@ -59,3 +59,5 @@ TYPE (distributed_vector) :: SCALP_DV
 ZTEMP = PVAZG * SCALP_DV
 END SUBROUTINE CAININAD_SCALE_DISTVEC
 END MODULE YOMCAIN
+
+! { dg-final { cleanup-modules "yomcain" } }
diff --git a/gcc/testsuite/gfortran.dg/structure_constructor_8.f03 b/gcc/testsuite/gfortran.dg/structure_constructor_8.f03
index 995fd806a96..4b0bce779db 100644
--- a/gcc/testsuite/gfortran.dg/structure_constructor_8.f03
+++ b/gcc/testsuite/gfortran.dg/structure_constructor_8.f03
@@ -58,4 +58,4 @@ PROGRAM test
   WRITE (*,*) ispriv_t (5) ! { dg-error "has no IMPLICIT type" }
 
 END PROGRAM test
-! { dg-final { cleanup-modules privmod } }
+! { dg-final { cleanup-modules "privmod" } }