From: Dominique d'Humieres Date: Sat, 15 Apr 2017 18:17:11 +0000 (+0200) Subject: deferred_character_3.f90: Fix dg directive. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=35cfdb17fa9921dfadc60ff8a87ce9f76b9611ed;p=gcc.git 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 --- diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 12cbc96339b..e091d641272 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 8f2933713c3..6ba25df48bf 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 6f95b56c5b8..c1f24d780f4 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 287007623c3..eebf95f6fec 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 cbbfa6f15f5..12d353353bc 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 b8fbb3c26ee..6eb1f619488 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 }