From e7e12d92e359d0f66834e4b98e7ce3cd9c6d26d7 Mon Sep 17 00:00:00 2001 From: Dominique d'Humieres Date: Fri, 22 Apr 2016 15:48:28 +0200 Subject: [PATCH] submodule_14.f08: Add cleanup-submodules. 2016-04-22 Dominique d'Humieres * gfortran.dg/submodule_14.f08: Add cleanup-submodules. * gfortran.dg/submodule_15.f08: Likewise. From-SVN: r235367 --- gcc/testsuite/ChangeLog | 5 +++++ gcc/testsuite/gfortran.dg/submodule_14.f08 | 2 +- gcc/testsuite/gfortran.dg/submodule_15.f08 | 1 + 3 files changed, 7 insertions(+), 1 deletion(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index e5eff26724b..673a7da822a 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2016-04-22 Dominique d'Humieres + + * gfortran.dg/submodule_14.f08: Add cleanup-submodules. + * gfortran.dg/submodule_15.f08: Likewise. + 2016-04-22 Richard Biener PR tree-optimization/70740 diff --git a/gcc/testsuite/gfortran.dg/submodule_14.f08 b/gcc/testsuite/gfortran.dg/submodule_14.f08 index 0d0806d686d..0e257d1b92e 100644 --- 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 499bc66d5ac..a09a7e7e403 100644 --- 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" } } -- 2.30.2