deferred_character_3.f90: Fix dg directive.

2017-04-15  Dominique d'Humieres  <dominiq@lps.ens.fr>

	* 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 12cbc96..e091d64 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,11 @@
+2017-04-15  Dominique d'Humieres  <dominiq@lps.ens.fr>
+
+       * 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  <segher@kernel.crashing.org>
 
        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 (file)
--- 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 (file)
--- 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 (file)
--- 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 (file)
--- 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 (file)
--- 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 }