[patch gfortran testsuite] Fix a few more dg directives in the testsuite

[dominiq at lps dot ens dot fr (Dominique Dhumieres)]

This patch is a part of the difference file of PR31883.  It fixes the
obvious typos and cleanup shortcomings and a following one fixes some
dg-output.

2007-05-13 Dominique d'Humières <dominiq@lps.ens.fr>

	* alloc_comp_basics_1.f90: Fix dg directive.
	* altreturn_3.f90: Likewise.
	* assumed_dummy_1.f90: Likewise.
	* default_numeric_type_1.f90: Likewise.
	* inquire_iolength.f90: Likewise.
	* module_naming_1.f90: Likewise.
	* oldstyle_2.f90: Likewise.
	* operator_2.f90: Likewise.
	* parameter_array_element_1.f90: Likewise.
	* unf_io_convert_3.f90: Likewise.
	* used_types_11.f90: Likewise.
	* zero_array_components_1.f90: Likewise.
	
diff -upr gcc-4.3-20070512/gcc/testsuite/gfortran.dg/alloc_comp_basics_1.f90 gcc-4.3-20070511/gcc/testsuite/gfortran.dg/alloc_comp_basics_1.f90
--- gcc-4.3-20070512/gcc/testsuite/gfortran.dg/alloc_comp_basics_1.f90  Mon Mar 26 22:14:51 2007
+++ gcc-4.3-20070511/gcc/testsuite/gfortran.dg/alloc_comp_basics_1.f90  Sat May  5 20:58:51 2007
@@ -1,4 +1,4 @@
-! { dg-do run}
+! { dg-do run }
 ! { dg-options "-O2 -fdump-tree-original" }
 !
 ! Check some basic functionality of allocatable components, including that they
diff -upr gcc-4.3-20070512/gcc/testsuite/gfortran.dg/altreturn_3.f90 gcc-4.3-20070511/gcc/testsuite/gfortran.dg/altreturn_3.f90
--- gcc-4.3-20070512/gcc/testsuite/gfortran.dg/altreturn_3.f90  Tue Dec 19 18:02:20 2006
+++ gcc-4.3-20070511/gcc/testsuite/gfortran.dg/altreturn_3.f90  Sat May  5 20:59:39 2007
@@ -1,4 +1,4 @@
-! { dg-do run}
+! { dg-do run }
 ! Tests the fix for PR30236, which was due to alternate returns
 ! in generic interfaces causing a segfault.  They now work
 ! correctly.
diff -upr gcc-4.3-20070512/gcc/testsuite/gfortran.dg/assumed_dummy_1.f90 gcc-4.3-20070511/gcc/testsuite/gfortran.dg/assumed_dummy_1.f90
--- gcc-4.3-20070512/gcc/testsuite/gfortran.dg/assumed_dummy_1.f90      Thu May 10 22:11:45 2007
+++ gcc-4.3-20070511/gcc/testsuite/gfortran.dg/assumed_dummy_1.f90      Sat May  5 21:00:09 2007
@@ -1,4 +1,4 @@
-! { dg-do run}
+! { dg-do run }
 ! Tests the fix for PRs 19358, 19477, 21211 and 21622.
 !
 ! Note that this tests only the valid cases with explicit interfaces.
diff -upr gcc-4.3-20070512/gcc/testsuite/gfortran.dg/default_numeric_type_1.f90 gcc-4.3-20070511/gcc/testsuite/gfortran.dg/default_numeric_type_1.f90
--- gcc-4.3-20070512/gcc/testsuite/gfortran.dg/default_numeric_type_1.f90       Sat Apr  7 22:20:49 2007
+++ gcc-4.3-20070511/gcc/testsuite/gfortran.dg/default_numeric_type_1.f90       Sat May  5 21:03:52 2007
@@ -1,4 +1,4 @@
-! { dg-do compile}
+! { dg-do compile }
 ! { dg-options "-fdump-tree-original" }
 ! Tests the fix for PR 31222, in which the type of the arguments of abs
 ! and int below were not detected to be of default numeric type..
@@ -16,3 +16,4 @@ end subroutine
 program testprog
   call mysub1((/1.,2./),(/1.,2.,3./),-2, 3.2)
 end
+! { dg-final { cleanup-tree-dump "original" } }
diff -upr gcc-4.3-20070512/gcc/testsuite/gfortran.dg/inquire_iolength.f90 gcc-4.3-20070511/gcc/testsuite/gfortran.dg/inquire_iolength.f90
--- gcc-4.3-20070512/gcc/testsuite/gfortran.dg/inquire_iolength.f90     Thu Dec 28 02:41:57 2006
+++ gcc-4.3-20070511/gcc/testsuite/gfortran.dg/inquire_iolength.f90     Sun May  6 15:38:28 2007
@@ -1,4 +1,4 @@
-! { dg-do compile}
+! { dg-do compile }
 ! { dg-options "-std=f95" }
 ! PR30014 IOLENGTH does not handle KIND=8.  This patch checks the constraints.
 ! Submitted by Jerry DeLisle  <jvdelisle@gcc.gnu.org>
diff -upr gcc-4.3-20070512/gcc/testsuite/gfortran.dg/module_naming_1.f90 gcc-4.3-20070511/gcc/testsuite/gfortran.dg/module_naming_1.f90
--- gcc-4.3-20070512/gcc/testsuite/gfortran.dg/module_naming_1.f90      Tue Apr 17 02:09:34 2007
+++ gcc-4.3-20070511/gcc/testsuite/gfortran.dg/module_naming_1.f90      Sat May  5 22:54:27 2007
@@ -29,3 +29,4 @@ contains
     ! mangled to __m2_mod_m2_MOD_m3
   end subroutine m3
 end module m2_MOD_m2
+! { dg-final { cleanup-modules "m1 m1__m2 m2 m2_MOD_m2" } }
diff -upr gcc-4.3-20070512/gcc/testsuite/gfortran.dg/oldstyle_2.f90 gcc-4.3-20070511/gcc/testsuite/gfortran.dg/oldstyle_2.f90
--- gcc-4.3-20070512/gcc/testsuite/gfortran.dg/oldstyle_2.f90   Mon Jul  3 22:19:23 2006
+++ gcc-4.3-20070511/gcc/testsuite/gfortran.dg/oldstyle_2.f90   Sat May  5 21:04:20 2007
@@ -1,4 +1,4 @@
-! { dg-do compile}
+! { dg-do compile }
 subroutine foo(i) ! { dg-error "DATA attribute" }
   integer i /10/
 end subroutine foo
diff -upr gcc-4.3-20070512/gcc/testsuite/gfortran.dg/operator_2.f90 gcc-4.3-20070511/gcc/testsuite/gfortran.dg/operator_2.f90
--- gcc-4.3-20070512/gcc/testsuite/gfortran.dg/operator_2.f90   Sun Mar 25 11:01:23 2007
+++ gcc-4.3-20070511/gcc/testsuite/gfortran.dg/operator_2.f90   Sun May  6 00:20:29 2007
@@ -38,3 +38,4 @@ contains
  end function f3
 
 end
+! { dg-final { cleanup-modules "foo" } }
diff -upr gcc-4.3-20070512/gcc/testsuite/gfortran.dg/parameter_array_element_1.f90 gcc-4.3-20070511/gcc/testsuite/gfortran.dg/parameter_array_element_1.f90
--- gcc-4.3-20070512/gcc/testsuite/gfortran.dg/parameter_array_element_1.f90    Sat Apr  7 22:23:40 2007
+++ gcc-4.3-20070511/gcc/testsuite/gfortran.dg/parameter_array_element_1.f90    Sat May  5 21:05:10 2007
@@ -1,4 +1,4 @@
-! { dg-do compile}
+! { dg-do compile }
 ! { dg-options "-fdump-tree-original" }
 ! Tests the fix for PR 30872, in which the array element references bo(1,1) etc.
 ! would be wrong for rank > 1.
diff -upr gcc-4.3-20070512/gcc/testsuite/gfortran.dg/unf_io_convert_3.f90 gcc-4.3-20070511/gcc/testsuite/gfortran.dg/unf_io_convert_3.f90
--- gcc-4.3-20070512/gcc/testsuite/gfortran.dg/unf_io_convert_3.f90     Sat Dec 10 21:01:56 2005
+++ gcc-4.3-20070511/gcc/testsuite/gfortran.dg/unf_io_convert_3.f90     Sat May  5 21:01:18 2007
@@ -1,4 +1,4 @@
-! { dg-do run}
+! { dg-do run }
 ! { dg-require-effective-target fortran_large_real }
 program main
   integer,parameter :: k = selected_real_kind (precision (0.0_8) + 1)
diff -upr gcc-4.3-20070512/gcc/testsuite/gfortran.dg/used_types_11.f90 gcc-4.3-20070511/gcc/testsuite/gfortran.dg/used_types_11.f90
--- gcc-4.3-20070512/gcc/testsuite/gfortran.dg/used_types_11.f90        Tue Oct 31 07:03:24 2006
+++ gcc-4.3-20070511/gcc/testsuite/gfortran.dg/used_types_11.f90        Sat May  5 20:49:46 2007
@@ -35,3 +35,4 @@ end subroutine bar
   x => foo ()
   print *, associated (x)
 end
+! { dg-final { cleanup-modules "A B" } }
diff -upr gcc-4.3-20070512/gcc/testsuite/gfortran.dg/zero_array_components_1.f90 gcc-4.3-20070511/gcc/testsuite/gfortran.dg/zero_array_components_1.f90
--- gcc-4.3-20070512/gcc/testsuite/gfortran.dg/zero_array_components_1.f90      Mon Apr 23 17:13:48 2007
+++ gcc-4.3-20070511/gcc/testsuite/gfortran.dg/zero_array_components_1.f90      Wed May  9 17:55:54 2007
@@ -1,4 +1,4 @@
-! { dg do-run }
+! { dg-do run }
 ! Tests the fix for PR31620, in which zeroing the component a for the array,
 ! would zero all the components of the array.
 !