From: Manfred Schwarb <manfred99@gmx.ch>
Date: Mon, 8 Jul 2013 12:09:13 +0000 (+0200)
Subject: defined_assignment_7.f90: Fix dg-do.
X-Git-Tag: releases/gcc-4.9.0~5082
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=454e172038cf31679aa69ba72c3c9980dbb23f9e;p=thirdparty%2Fgcc.git

defined_assignment_7.f90: Fix dg-do.

2013-07-08  Manfred Schwarb  <manfred99@gmx.ch>

        * gfortran.dg/defined_assignment_7.f90: Fix dg-do.
        * gfortran.dg/finalize_10.f90: Fix dg-final.

From-SVN: r200784
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 8de216fa48b5..32c5795584f8 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2013-07-08  Manfred Schwarb  <manfred99@gmx.ch>
+
+	* gfortran.dg/defined_assignment_7.f90: Fix dg-do.
+	* gfortran.dg/finalize_10.f90: Fix dg-final.
+
 2013-07-08  Jakub Jelinek  <jakub@redhat.com>
 
 	PR target/57819
diff --git a/gcc/testsuite/gfortran.dg/defined_assignment_7.f90 b/gcc/testsuite/gfortran.dg/defined_assignment_7.f90
index 5f60f50e7812..b2e43535e6b6 100644
--- a/gcc/testsuite/gfortran.dg/defined_assignment_7.f90
+++ b/gcc/testsuite/gfortran.dg/defined_assignment_7.f90
@@ -1,4 +1,4 @@
-! { dg-compile }
+! { dg-do compile }
 !
 ! PR fortran/57508
 !
diff --git a/gcc/testsuite/gfortran.dg/finalize_10.f90 b/gcc/testsuite/gfortran.dg/finalize_10.f90
index c56e13a09f18..e042f11146c2 100644
--- a/gcc/testsuite/gfortran.dg/finalize_10.f90
+++ b/gcc/testsuite/gfortran.dg/finalize_10.f90
@@ -32,8 +32,8 @@ end subroutine foo
 
 ! FINALIZE TYPE:
 ! { dg-final { scan-tree-dump-times "parm.\[0-9\]+.data = \\(void \\*\\) &\\(\\*aa.\[0-9\]+\\)\\\[0\\\];" 1 "original" } }
-! { dg!final { scan-tree-dump-times "__final_m_T2 (&parm.\[0-9\]+, 0, 0);" 1 "original" } }
-! { dg!final { scan-tree-dump-times "desc.\[0-9\]+.data = \\(void \\* restrict\\) bb;" 1 "original" } }
-! { dg!final { scan-tree-dump-times "__final_m_T2 (&desc.\[0-9\]+, 0, 0);" 1 "original" } }
+! { dg-final { scan-tree-dump-times "__final_m_T2 \\(&parm.\[0-9\]+, 0, 0\\);" 1 "original" } }
+! { dg-final { scan-tree-dump-times "desc.\[0-9\]+.data = \\(void \\* restrict\\) bb;" 1 "original" } }
+! { dg-final { scan-tree-dump-times "__final_m_T2 \\(&desc.\[0-9\]+, 0, 0\\);" 1 "original" } }
 
 ! { dg-final { cleanup-tree-dump "original" } }