[testsuite] : use "dg-do compile", not dg-compile

Index: gcc.target/i386/pr39315-check.c
===================================================================
--- gcc.target/i386/pr39315-check.c	(revision 162461)
+++ gcc.target/i386/pr39315-check.c	(working copy)
@@ -1,4 +1,4 @@ 
-/* { dg-compile } */
+/* { dg-do compile } */
 typedef float __m128 __attribute__ ((__vector_size__ (16)));
 __extension__ typedef __PTRDIFF_TYPE__ ptrdiff_t;
 
Index: gnat.dg/noreturn1.adb
===================================================================
--- gnat.dg/noreturn1.adb	(revision 162461)
+++ gnat.dg/noreturn1.adb	(working copy)
@@ -1,4 +1,4 @@ 
--- { dg-compile }
+-- { dg-do compile }
 
 package body Noreturn1 is
 
Index: gnat.dg/specs/small_alignment.ads
===================================================================
--- gnat.dg/specs/small_alignment.ads	(revision 162461)
+++ gnat.dg/specs/small_alignment.ads	(working copy)
@@ -1,4 +1,4 @@ 
--- { dg-compile }
+-- { dg-do compile }
 
 package Small_Alignment is
 
Index: gcc.dg/transparent-union-1.c
===================================================================
--- gcc.dg/transparent-union-1.c	(revision 162461)
+++ gcc.dg/transparent-union-1.c	(working copy)
@@ -1,5 +1,5 @@ 
 /* PR c/20043 */
-/* { dg-compile } */
+/* { dg-do compile } */
 /* { dg-options "-std=gnu99" } */
 
 extern void f0 (int *);
Index: gcc.dg/gomp/sections-4.c
===================================================================
--- gcc.dg/gomp/sections-4.c	(revision 162461)
+++ gcc.dg/gomp/sections-4.c	(working copy)
@@ -1,5 +1,5 @@ 
 /* PR c++/24613 */
-/* { dg-compile } */
+/* { dg-do compile } */
 
 #pragma omp section	/* { dg-error "may only be used in" } */
 
Index: gcc.dg/transparent-union-2.c
===================================================================
--- gcc.dg/transparent-union-2.c	(revision 162461)
+++ gcc.dg/transparent-union-2.c	(working copy)
@@ -1,5 +1,5 @@ 
 /* PR c/20043 */
-/* { dg-compile } */
+/* { dg-do compile } */
 /* { dg-options "-std=gnu99" } */
 
 typedef union { int *i; long *l; } U
Index: gcc.dg/float-range-3.c
===================================================================
--- gcc.dg/float-range-3.c	(revision 162461)
+++ gcc.dg/float-range-3.c	(working copy)
@@ -1,5 +1,5 @@ 
 /* PR 23572 : warnings for out of range floating-point constants.  */
-/* { dg-compile } */
+/* { dg-do compile } */
 /* { dg-options "-std=c99" } */
 /* { dg-skip-if "No Inf support" { spu-*-* } } */
 #include <math.h>
Index: gcc.dg/float-range-4.c
===================================================================
--- gcc.dg/float-range-4.c	(revision 162461)
+++ gcc.dg/float-range-4.c	(working copy)
@@ -1,5 +1,5 @@ 
 /* PR 23572 : warnings for out of range floating-point constants.  */
-/* { dg-compile } */
+/* { dg-do compile } */
 /* { dg-options "-Wno-overflow -std=c99" } */
 /* { dg-skip-if "No Inf support" { spu-*-* } } */
 #include <math.h>
Index: gcc.dg/fold-overflow-1.c
===================================================================
--- gcc.dg/fold-overflow-1.c	(revision 162461)
+++ gcc.dg/fold-overflow-1.c	(working copy)
@@ -1,4 +1,4 @@ 
-/* { dg-compile } */
+/* { dg-do compile } */
 /* { dg-skip-if "consts are shorts, not longs" { "m32c-*-*" "avr-*-*" } { "*" } { "" } } */
 /* { dg-skip-if "No Inf support" { spu-*-* } } */
 /* { dg-options "-O -ftrapping-math" } */
Index: gcc.dg/float-range-5.c
===================================================================
--- gcc.dg/float-range-5.c	(revision 162461)
+++ gcc.dg/float-range-5.c	(working copy)
@@ -1,6 +1,6 @@ 
 /* PR 23572 : warnings for out of range floating-point constants 
    Test that they are NOT pedantic warnings.  */
-/* { dg-compile } */
+/* { dg-do compile } */
 /* { dg-options "-pedantic-errors -std=c99" } */
 /* { dg-skip-if "No Inf support" { spu-*-* } } */
 #include <math.h>
Index: g++.dg/tree-ssa/pr19952.C
===================================================================
--- g++.dg/tree-ssa/pr19952.C	(revision 162461)
+++ g++.dg/tree-ssa/pr19952.C	(working copy)
@@ -1,5 +1,5 @@ 
 /* PR 19952 */
-/* { dg-compile } */
+/* { dg-do compile } */
 /* { dg-options "-ftree-vectorize -O2" } */
 
 int i;
Index: g++.dg/gomp/sections-4.C
===================================================================
--- g++.dg/gomp/sections-4.C	(revision 162461)
+++ g++.dg/gomp/sections-4.C	(working copy)
@@ -1,5 +1,5 @@ 
 /* PR c++/24613 */
-/* { dg-compile } */
+/* { dg-do compile } */
 
 #pragma omp section	/* { dg-error "may only be used in" } */
 
Index: g++.dg/template/dtor7.C
===================================================================
--- g++.dg/template/dtor7.C	(revision 162461)
+++ g++.dg/template/dtor7.C	(working copy)
@@ -1,5 +1,5 @@ 
 // PR c++/40373
-// { dg-compile }
+// { dg-do compile }
 
 struct A;
 namespace
Index: gfortran.dg/graphite/pr42185.f90
===================================================================
--- gfortran.dg/graphite/pr42185.f90	(revision 162461)
+++ gfortran.dg/graphite/pr42185.f90	(working copy)
@@ -1,4 +1,4 @@ 
-! { dg-compile }
+! { dg-do compile }
 ! { dg-options "-fgraphite -O -ffast-math" }
 
 MODULE powell
Index: gfortran.dg/namelist_36.f90
===================================================================
--- gfortran.dg/namelist_36.f90	(revision 162461)
+++ gfortran.dg/namelist_36.f90	(working copy)
@@ -1,4 +1,4 @@ 
-! { dg-compile }
+! { dg-do compile }
 !
 ! Private types and types with private components
 ! are acceptable in local namelists.
Index: gfortran.dg/derived_constructor_comps_3.f90
===================================================================
--- gfortran.dg/derived_constructor_comps_3.f90	(revision 162461)
+++ gfortran.dg/derived_constructor_comps_3.f90	(working copy)
@@ -1,4 +1,4 @@ 
-! { dg-compile }
+! { dg-do compile }
 ! 
 ! gfortran was ICEing for the constructor of
 ! componentfree types.