From 3eebd7765db0d94f8231a5f235b0d1afa475343d Mon Sep 17 00:00:00 2001
From: Francois-Xavier Coudert <coudert@clipper.ens.fr>
Date: Tue, 5 Apr 2005 10:24:55 +0200
Subject: [PATCH] backspace.f, [...]: Correct dejagnu syntax.

	* gfortran.dg/backspace.f, gfortran.dg/g77_intrinsics_funcs.f,
	gfortran.dg/g77_intrinsics_sub.f, gfortran.dg/negative_unit.f,
	gfortran.dg/pr18025.f90, gfortran.dg/g77/12002.f: Correct dejagnu
	syntax.

From-SVN: r97611
---
 gcc/testsuite/ChangeLog                          | 7 +++++++
 gcc/testsuite/gfortran.dg/backspace.f            | 2 +-
 gcc/testsuite/gfortran.dg/g77/12002.f            | 2 +-
 gcc/testsuite/gfortran.dg/g77_intrinsics_funcs.f | 2 +-
 gcc/testsuite/gfortran.dg/g77_intrinsics_sub.f   | 2 +-
 gcc/testsuite/gfortran.dg/negative_unit.f        | 2 +-
 gcc/testsuite/gfortran.dg/pr18025.f90            | 2 +-
 7 files changed, 13 insertions(+), 6 deletions(-)

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 2999619d088..5aeaad9a25f 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,10 @@
+2005-04-05  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
+
+	* gfortran.dg/backspace.f, gfortran.dg/g77_intrinsics_funcs.f,
+	gfortran.dg/g77_intrinsics_sub.f, gfortran.dg/negative_unit.f,
+	gfortran.dg/pr18025.f90, gfortran.dg/g77/12002.f: Correct dejagnu
+	syntax.
+
 2005-04-05  Eric Botcazou  <ebotcazou@libertysurf.fr>
 
 	* gcc.c-torture/compile/20040323-1.c (_rtld_global): Set to 1.
diff --git a/gcc/testsuite/gfortran.dg/backspace.f b/gcc/testsuite/gfortran.dg/backspace.f
index ebf43f59f0f..c3ec0c41756 100644
--- a/gcc/testsuite/gfortran.dg/backspace.f
+++ b/gcc/testsuite/gfortran.dg/backspace.f
@@ -1,5 +1,5 @@
 ! This file is all about BACKSPACE
-! {dg-do run}
+! { dg-do run }
 
       integer i, n, nr
       real x(10), y(10)
diff --git a/gcc/testsuite/gfortran.dg/g77/12002.f b/gcc/testsuite/gfortran.dg/g77/12002.f
index 609573f4a62..0cb29c7549e 100644
--- a/gcc/testsuite/gfortran.dg/g77/12002.f
+++ b/gcc/testsuite/gfortran.dg/g77/12002.f
@@ -1,5 +1,5 @@
 C      PR middle-end/12002
-C {dg-do compile }
+C { dg-do compile }
        COMPLEX TE1
        TE1=-2.
        TE1=TE1+TE1
diff --git a/gcc/testsuite/gfortran.dg/g77_intrinsics_funcs.f b/gcc/testsuite/gfortran.dg/g77_intrinsics_funcs.f
index fa09024411d..a2c37b03fdc 100644
--- a/gcc/testsuite/gfortran.dg/g77_intrinsics_funcs.f
+++ b/gcc/testsuite/gfortran.dg/g77_intrinsics_funcs.f
@@ -1,4 +1,4 @@
-! {dg-do compile}
+! { dg-do compile }
 ! Testing g77 intrinsics as subroutines
       integer*8 i8
       integer*4 i4
diff --git a/gcc/testsuite/gfortran.dg/g77_intrinsics_sub.f b/gcc/testsuite/gfortran.dg/g77_intrinsics_sub.f
index 5a4744697bd..1d797f75a28 100644
--- a/gcc/testsuite/gfortran.dg/g77_intrinsics_sub.f
+++ b/gcc/testsuite/gfortran.dg/g77_intrinsics_sub.f
@@ -1,4 +1,4 @@
-! {dg-do compile}
+! { dg-do compile }
 ! Testing g77 intrinsics as subroutines
       integer*8 i8, j8
       integer*4 i4, j4
diff --git a/gcc/testsuite/gfortran.dg/negative_unit.f b/gcc/testsuite/gfortran.dg/negative_unit.f
index ba0d3cd1a4d..fd0100a14de 100644
--- a/gcc/testsuite/gfortran.dg/negative_unit.f
+++ b/gcc/testsuite/gfortran.dg/negative_unit.f
@@ -1,4 +1,4 @@
-! {dg-do run}
+! { dg-do run }
 !
 ! PR libfortran/20660 and other bugs (not filed in bugzilla) relating
 ! to negative units
diff --git a/gcc/testsuite/gfortran.dg/pr18025.f90 b/gcc/testsuite/gfortran.dg/pr18025.f90
index 69a6af6ffa9..26d5c01e023 100644
--- a/gcc/testsuite/gfortran.dg/pr18025.f90
+++ b/gcc/testsuite/gfortran.dg/pr18025.f90
@@ -1,5 +1,5 @@
 ! PR libfortran/18025  <coudert@clipper.ens.fr>
-! {dg-do run}
+! { dg-do run }
   character(len=80) :: c
   write(c, "('#',F0.2,'#')") 1.23
   if (c /= '#1.23#') call abort
-- 
2.30.2