submodule_14.f08: Add cleanup-submodules.

2016-04-22  Dominique d'Humieres  <dominiq@lps.ens.fr>

	* gfortran.dg/submodule_14.f08: Add cleanup-submodules.
	* gfortran.dg/submodule_15.f08: Likewise.

From-SVN: r235367

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index e5eff26724b9ff6ba28d8b8a3b8dfb6b4483ef3e..673a7da822aee3a0a81b0799f11cf0f5f8f775e8 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2016-04-22  Dominique d'Humieres  <dominiq@lps.ens.fr>
+
+       * gfortran.dg/submodule_14.f08: Add cleanup-submodules.
+       * gfortran.dg/submodule_15.f08: Likewise.
+
 2016-04-22  Richard Biener  <rguenther@suse.de>
 
        PR tree-optimization/70740

diff --git a/gcc/testsuite/gfortran.dg/submodule_14.f08 b/gcc/testsuite/gfortran.dg/submodule_14.f08
index 0d0806d686db4c015ecb44fe4bef36be391ee3ff..0e257d1b92e2eef75c866964066d3f911896bf57 100644 (file)
--- a/gcc/testsuite/gfortran.dg/submodule_14.f08
+++ b/gcc/testsuite/gfortran.dg/submodule_14.f08
@@ -46,4 +46,4 @@ end submodule testson
   x = 10
   if (fcn1 (x) .ne. 0) call abort
 end
-
+! { dg-final { cleanup-submodules "test@testson" } }

diff --git a/gcc/testsuite/gfortran.dg/submodule_15.f08 b/gcc/testsuite/gfortran.dg/submodule_15.f08
index 499bc66d5ac4cc84e90255cdf7ee1a2a297904c2..a09a7e7e403485e674110e228596786c7479f59c 100644 (file)
--- a/gcc/testsuite/gfortran.dg/submodule_15.f08
+++ b/gcc/testsuite/gfortran.dg/submodule_15.f08
@@ -56,3 +56,4 @@ end submodule
   incr = 1
   if (a3(i) .ne. 11) call abort
 end
+! { dg-final { cleanup-submodules "a@a_son" } }