Missing spaces in dg directives.

[Dominique Dhumieres]

It has been a long time I have not palyed to find missing spaces
in dg directives. Here is the catch of today:

--- ../_gcc_clean/gcc/testsuite/gfortran.dg/elemental_bind_c.f90	2007-11-07 10:26:24.000000000 +0100
+++ gcc/testsuite/gfortran.dg/elemental_bind_c.f90	2009-01-06 12:00:19.000000000 +0100
@@ -1,4 +1,4 @@
-! {dg-do compile }
+! { dg-do compile }
 !
 ! PR fortran/33412
 !
--- ../_gcc_clean/gcc/testsuite/gfortran.dg/implicit_12.f90	2008-09-10 14:55:21.000000000 +0200
+++ gcc/testsuite/gfortran.dg/implicit_12.f90	2009-01-06 12:00:45.000000000 +0100
@@ -1,4 +1,4 @@
-! { dg-do run}
+! { dg-do run }
 !
 ! PR fortran/37400
 !
--- ../_gcc_clean/gcc/testsuite/gfortran.dg/interface_proc_end.f90	2008-02-25 10:57:37.000000000 +0100
+++ gcc/testsuite/gfortran.dg/interface_proc_end.f90	2009-01-06 12:01:14.000000000 +0100
@@ -1,4 +1,4 @@
-! { dg-do compile}
+! { dg-do compile }
 !
 ! PR fortran/34763
 ! Before, gfortran did not allow for the "END" in
--- ../_gcc_clean/gcc/testsuite/gfortran.dg/typebound_call_7.f03	2008-09-09 20:51:35.000000000 +0200
+++ gcc/testsuite/gfortran.dg/typebound_call_7.f03	2009-01-06 12:01:40.000000000 +0100
@@ -1,4 +1,4 @@
-! { dg-do compile}
+! { dg-do compile }
 
 ! PR fortran/37429
 ! Checks for assignments from type-bound functions.
--- ../_gcc_clean/gcc/testsuite/gfortran.dg/typebound_call_8.f03	2008-09-09 20:51:35.000000000 +0200
+++ gcc/testsuite/gfortran.dg/typebound_call_8.f03	2009-01-06 12:01:49.000000000 +0100
@@ -1,4 +1,4 @@
-! { dg-do compile}
+! { dg-do compile }
 
 ! PR fortran/37429
 ! This used to ICE, check that is fixed.

While I am at it, could the following patch applied too:

--- ../_gcc_clean/gcc/testsuite/gfortran.dg/pr37243.f	2008-12-10 09:08:04.000000000 +0100
+++ gcc/testsuite/gfortran.dg/pr37243.f	2008-12-10 09:10:17.000000000 +0100
@@ -35,7 +35,7 @@
       IF (J .GT. N) GO TO 320
       DO 240 K = 1,N
   240 V(K,I) = ZERO
-      CALL DAXPY(N,DUM,V(1,II),1,V(1,I),1)
+      CALL DAXPY(N,DUM,V(1,I),1,V(1,I),1)
   260 CONTINUE
       DUMI = ZERO
       DO 280 K = 1,N

The variable II is a typo that trigger a false positive with -fbounds-check
(II is not initialized).

TIA

Dominique