From 35cfdb17fa9921dfadc60ff8a87ce9f76b9611ed Mon Sep 17 00:00:00 2001 From: Dominique d'Humieres Date: Sat, 15 Apr 2017 20:17:11 +0200 Subject: [PATCH] deferred_character_3.f90: Fix dg directive. 2017-04-15 Dominique d'Humieres * gfortran.dg/deferred_character_3.f90: Fix dg directive. * gfortran.dg/generic_29.f90: Likewise. * gfortran.dg/goacc/multi-clause.f90: Likewise. * gfortran.dg/pr41922.f90: Likewise. * gfortran.dg/pr70006.f90: Likewise. From-SVN: r246940 --- gcc/testsuite/ChangeLog | 8 ++++++++ gcc/testsuite/gfortran.dg/deferred_character_3.f90 | 2 +- gcc/testsuite/gfortran.dg/generic_29.f90 | 2 +- gcc/testsuite/gfortran.dg/goacc/multi-clause.f90 | 2 +- gcc/testsuite/gfortran.dg/pr41922.f90 | 2 +- gcc/testsuite/gfortran.dg/pr70006.f90 | 2 +- 6 files changed, 13 insertions(+), 5 deletions(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 12cbc96..e091d64 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,11 @@ +2017-04-15 Dominique d'Humieres + + * gfortran.dg/deferred_character_3.f90: Fix dg directive. + * gfortran.dg/generic_29.f90: Likewise. + * gfortran.dg/goacc/multi-clause.f90: Likewise. + * gfortran.dg/pr41922.f90: Likewise. + * gfortran.dg/pr70006.f90: Likewise. + 2017-04-15 Segher Boessenkool PR tree-optimization/66612 diff --git a/gcc/testsuite/gfortran.dg/deferred_character_3.f90 b/gcc/testsuite/gfortran.dg/deferred_character_3.f90 index 8f29337..6ba25df 100644 --- a/gcc/testsuite/gfortran.dg/deferred_character_3.f90 +++ b/gcc/testsuite/gfortran.dg/deferred_character_3.f90 @@ -1,4 +1,4 @@ -! {dg_do run } +! { dg-do run } ! ! Tests the fix for PR67674 ! diff --git a/gcc/testsuite/gfortran.dg/generic_29.f90 b/gcc/testsuite/gfortran.dg/generic_29.f90 index 6f95b56..c1f24d7 100644 --- a/gcc/testsuite/gfortran.dg/generic_29.f90 +++ b/gcc/testsuite/gfortran.dg/generic_29.f90 @@ -1,4 +1,4 @@ -! { dg-do compile} +! { dg-do compile } ! PR fortran/66057 ! ! Original code from Gerhard Steinmetz diff --git a/gcc/testsuite/gfortran.dg/goacc/multi-clause.f90 b/gcc/testsuite/gfortran.dg/goacc/multi-clause.f90 index 2870076..eebf95f 100644 --- a/gcc/testsuite/gfortran.dg/goacc/multi-clause.f90 +++ b/gcc/testsuite/gfortran.dg/goacc/multi-clause.f90 @@ -1,6 +1,6 @@ ! Test if variable appearing in multiple clauses are errors. -! { dg-compile } +! { dg-do compile } program combined implicit none diff --git a/gcc/testsuite/gfortran.dg/pr41922.f90 b/gcc/testsuite/gfortran.dg/pr41922.f90 index cbbfa6f..12d3533 100644 --- a/gcc/testsuite/gfortran.dg/pr41922.f90 +++ b/gcc/testsuite/gfortran.dg/pr41922.f90 @@ -1,4 +1,4 @@ -! { dg-do compile} +! { dg-do compile } ! { dg-options -std=gnu } Subroutine RestoreR8Run() Implicit NONE diff --git a/gcc/testsuite/gfortran.dg/pr70006.f90 b/gcc/testsuite/gfortran.dg/pr70006.f90 index b8fbb3c..6eb1f61 100644 --- a/gcc/testsuite/gfortran.dg/pr70006.f90 +++ b/gcc/testsuite/gfortran.dg/pr70006.f90 @@ -1,4 +1,4 @@ -! { dg-do compile} +! { dg-do compile } program test print 1, 'string 1' ! { dg-error "FORMAT label 1" " " { target *-*-* } 3 } print 1, 'string 2' ! { dg-error "FORMAT label 1" " " { target *-*-* } 4 } -- 2.7.4