From patchwork Thu Aug 4 20:45:34 2011 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Steve Kargl X-Patchwork-Id: 108565 Return-Path: X-Original-To: incoming@patchwork.ozlabs.org Delivered-To: patchwork-incoming@bilbo.ozlabs.org Received: from sourceware.org (server1.sourceware.org [209.132.180.131]) by ozlabs.org (Postfix) with SMTP id E54B9B6F72 for ; Fri, 5 Aug 2011 06:45:58 +1000 (EST) Received: (qmail 24166 invoked by alias); 4 Aug 2011 20:45:53 -0000 Received: (qmail 24107 invoked by uid 22791); 4 Aug 2011 20:45:52 -0000 X-SWARE-Spam-Status: No, hits=-2.3 required=5.0 tests=AWL, BAYES_00, RP_MATCHES_RCVD X-Spam-Check-By: sourceware.org Received: from troutmask.apl.washington.edu (HELO troutmask.apl.washington.edu) (128.95.76.21) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Thu, 04 Aug 2011 20:45:35 +0000 Received: from troutmask.apl.washington.edu (localhost.apl.washington.edu [127.0.0.1]) by troutmask.apl.washington.edu (8.14.4/8.14.4) with ESMTP id p74KjYU2023637; Thu, 4 Aug 2011 13:45:34 -0700 (PDT) (envelope-from sgk@troutmask.apl.washington.edu) Received: (from sgk@localhost) by troutmask.apl.washington.edu (8.14.4/8.14.4/Submit) id p74KjYrl023636; Thu, 4 Aug 2011 13:45:34 -0700 (PDT) (envelope-from sgk) Date: Thu, 4 Aug 2011 13:45:34 -0700 From: Steve Kargl To: Tobias Burnus Cc: gcc patches , gfortran Subject: Re: [Patch, Fortran testsuite, committed] Add/fix dg-final cleanup-module Message-ID: <20110804204534.GA23576@troutmask.apl.washington.edu> References: <4E381916.6030100@net-b.de> Mime-Version: 1.0 Content-Disposition: inline In-Reply-To: <4E381916.6030100@net-b.de> User-Agent: Mutt/1.4.2.3i Mailing-List: contact gcc-patches-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Unsubscribe: List-Archive: List-Post: List-Help: Sender: gcc-patches-owner@gcc.gnu.org Delivered-To: mailing list gcc-patches@gcc.gnu.org On Tue, Aug 02, 2011 at 05:34:46PM +0200, Tobias Burnus wrote: > > There might be still some missing or wrong cleanups, but most remaining > .mod files are from gfortran.fortran-torture. > Yes, you missed a few. 2011-08-04 Steven G. Kargl * gfortran.dg/trim_optimize_2.f90: Clean up created module(s). * gfortran.dg/ldist-pr43023.f90: Ditto. * gfortran.dg/vector_subscript_bound_1.f90: Ditto. * gfortran.dg/generic_typebound_operator_1.f90: Ditto. Index: gcc/testsuite/gfortran.dg/trim_optimize_2.f90 =================================================================== --- gcc/testsuite/gfortran.dg/trim_optimize_2.f90 (revision 177414) +++ gcc/testsuite/gfortran.dg/trim_optimize_2.f90 (working copy) @@ -35,3 +35,4 @@ end program main ! { dg-final { scan-tree-dump-times "memmove" 4 "original" } } ! { dg-final { scan-tree-dump-times "string_trim" 0 "original" } } ! { dg-final { cleanup-tree-dump "original" } } +! { dg-final { cleanup-modules "faz" } } Index: gcc/testsuite/gfortran.dg/ldist-pr43023.f90 =================================================================== --- gcc/testsuite/gfortran.dg/ldist-pr43023.f90 (revision 177414) +++ gcc/testsuite/gfortran.dg/ldist-pr43023.f90 (working copy) @@ -29,3 +29,4 @@ end do END SUBROUTINE NFT_Init END MODULE NFT_mod +! { dg-final{ cleanup-modules "nft_mod" } } Index: gcc/testsuite/gfortran.dg/vector_subscript_bound_1.f90 =================================================================== --- gcc/testsuite/gfortran.dg/vector_subscript_bound_1.f90 (revision 177414) +++ gcc/testsuite/gfortran.dg/vector_subscript_bound_1.f90 (working copy) @@ -17,3 +17,4 @@ CONTAINS PRINT *, pw%cr(UBOUND(pw%cr)) END SUBROUTINE pw_write END MODULE +! { dg-final { cleanup-modules "pw_types" } } Index: gcc/testsuite/gfortran.dg/generic_typebound_operator_1.f90 =================================================================== --- gcc/testsuite/gfortran.dg/generic_typebound_operator_1.f90 (revision 177414) +++ gcc/testsuite/gfortran.dg/generic_typebound_operator_1.f90 (working copy) @@ -17,3 +17,4 @@ module m_sort end function gt_cmp end interface end module m_sort +! { dg-final { cleanup-modules "m_sort" } }