diff options
| author | Manfred Schwarb <manfred99@gmx.ch> | 2013-07-08 14:09:13 +0200 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2013-07-08 14:09:13 +0200 |
| commit | 454e172038cf31679aa69ba72c3c9980dbb23f9e (patch) | |
| tree | 01dbf1178a5d6ce87c4603ee13614d68bd0de962 /gcc | |
| parent | e6ac0270469fb0e42fbee87d5fe3d508b713a794 (diff) | |
| download | gcc-454e172038cf31679aa69ba72c3c9980dbb23f9e.zip gcc-454e172038cf31679aa69ba72c3c9980dbb23f9e.tar.gz gcc-454e172038cf31679aa69ba72c3c9980dbb23f9e.tar.bz2 | |
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
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/defined_assignment_7.f90 | 2 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/finalize_10.f90 | 6 |
3 files changed, 9 insertions, 4 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 8de216f..32c5795 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 5f60f50..b2e4353 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 c56e13a..e042f11 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" } } |