abstract_type_1.f90: Fix dg-do syntax.

2011-02-22  Tobias Burnus  <burnus@net-b.de>

        * abstract_type_1.f90: Fix dg-do syntax.
        * abstract_type_2.f03: Ditto.
        * abstract_type_3.f03: Ditto.
        * abstract_type_4.f03: Ditto.
        * abstract_type_5.f03: Ditto.
        * abstract_type_6.f03: Ditto.
        * alloc_comp_constraint_6.f90: Ditto.
        * alloc_comp_init_expr.f03: Ditto.
        * allocatable_scalar_11.f90: Ditto.
        * allocate_scalar_with_shape.f90: Ditto.
        * array_function_5.f90: Ditto.
        * asynchronous_3.f03: Ditto.
        * char_expr_1.f90: Ditto.
        * class_14.f03: Ditto.
        * data_array_6.f: Ditto.
        * data_invalid.f90: Ditto.
        * dot_product_1.f03: Ditto.
        * func_derived_5.f90: Ditto.
        * func_result_4.f90: Ditto.
        * implied_do_1.f90: Ditto.
        * initialization_25.f90: Ditto.
        * initialization_26.f90: Ditto.
        * interface_34.f90: Ditto.
        * iso_c_binding_init_expr.f03: Ditto.
        * keyword_symbol_1.f90: Ditto.
        * matmul_8.f03: Ditto.
        * merge_init_expr.f90: Ditto.
        * pack_assign_1.f90: Ditto.
        * pack_vector_1.f90: Ditto.
        * pointer_check_8.f90: Ditto.
        * product_init_expr.f03: Ditto.
        * reshape_order_5.f90: Ditto.
        * reshape_shape_1.f90: Ditto.
        * reshape_zerosize_2.f90: Ditto.
        * same_name_2.f90: Ditto.
        * selected_real_kind_1.f90: Ditto.
        * spread_init_expr.f03: Ditto.
        * stmt_func_1.f90: Ditto.
        * sum_init_expr.f03: Ditto.
        * transpose_3.f03: Ditto.
        * unpack_init_expr.f03: Ditto.
        * warn_conversion.f90: Ditto.
        * warn_conversion_2.f90: Ditto.
        * warn_intent_out_not_set.f90: Ditto.
        * warn_unused_dummy_argument_1.f90: Ditto.
        * warn_unused_dummy_argument_2.f90: Ditto.
        * whole_file_16.f90: Ditto.
        * whole_file_17.f90: Ditto.
        * whole_file_18.f90: Ditto.
        * whole_file_20.f03: Ditto.
        * whole_file_5.f90: Ditto.
        * whole_file_6.f90: Ditto.
        * write_invalid_format.f90: Ditto.
        * zero_sized_6.f90: Ditto.

From-SVN: r170393

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index d27cd28a44adcfe7163ef46015390e576d96b0ad..4d824c3ccd690dcd5b942a5c87aa06c2ad6015e5 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,60 @@
+2011-02-22  Tobias Burnus  <burnus@net-b.de>
+
+       * abstract_type_1.f90: Fix dg-do syntax.
+       * abstract_type_2.f03: Ditto.
+       * abstract_type_3.f03: Ditto.
+       * abstract_type_4.f03: Ditto.
+       * abstract_type_5.f03: Ditto.
+       * abstract_type_6.f03: Ditto.
+       * alloc_comp_constraint_6.f90: Ditto.
+       * alloc_comp_init_expr.f03: Ditto.
+       * allocatable_scalar_11.f90: Ditto.
+       * allocate_scalar_with_shape.f90: Ditto.
+       * array_function_5.f90: Ditto.
+       * asynchronous_3.f03: Ditto.
+       * char_expr_1.f90: Ditto.
+       * class_14.f03: Ditto.
+       * data_array_6.f: Ditto.
+       * data_invalid.f90: Ditto.
+       * dot_product_1.f03: Ditto.
+       * func_derived_5.f90: Ditto.
+       * func_result_4.f90: Ditto.
+       * implied_do_1.f90: Ditto.
+       * initialization_25.f90: Ditto.
+       * initialization_26.f90: Ditto.
+       * interface_34.f90: Ditto.
+       * iso_c_binding_init_expr.f03: Ditto.
+       * keyword_symbol_1.f90: Ditto.
+       * matmul_8.f03: Ditto.
+       * merge_init_expr.f90: Ditto.
+       * pack_assign_1.f90: Ditto.
+       * pack_vector_1.f90: Ditto.
+       * pointer_check_8.f90: Ditto.
+       * product_init_expr.f03: Ditto.
+       * reshape_order_5.f90: Ditto.
+       * reshape_shape_1.f90: Ditto.
+       * reshape_zerosize_2.f90: Ditto.
+       * same_name_2.f90: Ditto.
+       * selected_real_kind_1.f90: Ditto.
+       * spread_init_expr.f03: Ditto.
+       * stmt_func_1.f90: Ditto.
+       * sum_init_expr.f03: Ditto.
+       * transpose_3.f03: Ditto.
+       * unpack_init_expr.f03: Ditto.
+       * warn_conversion.f90: Ditto.
+       * warn_conversion_2.f90: Ditto.
+       * warn_intent_out_not_set.f90: Ditto.
+       * warn_unused_dummy_argument_1.f90: Ditto.
+       * warn_unused_dummy_argument_2.f90: Ditto.
+       * whole_file_16.f90: Ditto.
+       * whole_file_17.f90: Ditto.
+       * whole_file_18.f90: Ditto.
+       * whole_file_20.f03: Ditto.
+       * whole_file_5.f90: Ditto.
+       * whole_file_6.f90: Ditto.
+       * write_invalid_format.f90: Ditto.
+       * zero_sized_6.f90: Ditto.
+
 2011-02-21  Jeff Law <law@redhat.com>
 
        PR rtl-optimization/46178

diff --git a/gcc/testsuite/gfortran.dg/abstract_type_1.f90 b/gcc/testsuite/gfortran.dg/abstract_type_1.f90
index 7a91e11a89c22242b78fcaf8a32995fbb3014a43..d0cd4320a7cd028d756713ae9e0caf8cc3bd5d64 100644 (file)
--- a/gcc/testsuite/gfortran.dg/abstract_type_1.f90
+++ b/gcc/testsuite/gfortran.dg/abstract_type_1.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-std=f95" }
 
 ! Abstract Types.

diff --git a/gcc/testsuite/gfortran.dg/abstract_type_2.f03 b/gcc/testsuite/gfortran.dg/abstract_type_2.f03
index 9b4ddebe40a1de806daa776f15696aa03701b510..2583f1f4f80135fb18326cb9262c26eebf48b6bd 100644 (file)
--- a/gcc/testsuite/gfortran.dg/abstract_type_2.f03
+++ b/gcc/testsuite/gfortran.dg/abstract_type_2.f03
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 
 ! Abstract Types.
 ! Check for parser errors.

diff --git a/gcc/testsuite/gfortran.dg/abstract_type_3.f03 b/gcc/testsuite/gfortran.dg/abstract_type_3.f03
index a6f06235d24e440c38a653087bbb4349b47aeca7..79bc131e0c646c02993339befb5537a219127c4f 100644 (file)
--- a/gcc/testsuite/gfortran.dg/abstract_type_3.f03
+++ b/gcc/testsuite/gfortran.dg/abstract_type_3.f03
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 
 ! Abstract Types.
 ! Check for errors when using abstract types in an inappropriate way.

diff --git a/gcc/testsuite/gfortran.dg/abstract_type_4.f03 b/gcc/testsuite/gfortran.dg/abstract_type_4.f03
index bc34d4e541f7ab311c70a770a712ce735a2cee44..a6e5de2088283d3ca88b082ac67f7ba0ca28d4c4 100644 (file)
--- a/gcc/testsuite/gfortran.dg/abstract_type_4.f03
+++ b/gcc/testsuite/gfortran.dg/abstract_type_4.f03
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 
 ! Abstract Types.
 ! Check for module file IO.

diff --git a/gcc/testsuite/gfortran.dg/abstract_type_5.f03 b/gcc/testsuite/gfortran.dg/abstract_type_5.f03
index 7da38e8fed7b7151bd76755c5a0c13e4ea58edd5..42ac963face7f2e021f472cc6d5cab63c34e89d9 100644 (file)
--- a/gcc/testsuite/gfortran.dg/abstract_type_5.f03
+++ b/gcc/testsuite/gfortran.dg/abstract_type_5.f03
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 
 ! Abstract Types.
 ! Check for correct handling of abstract-typed base object references.

diff --git a/gcc/testsuite/gfortran.dg/abstract_type_6.f03 b/gcc/testsuite/gfortran.dg/abstract_type_6.f03
index bc8e5437ad5e47544ab75a84eebf55c2943db317..53116dfb3601f1a61892598d824ed01b0c2b7d13 100644 (file)
--- a/gcc/testsuite/gfortran.dg/abstract_type_6.f03
+++ b/gcc/testsuite/gfortran.dg/abstract_type_6.f03
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! Test the fix for PR43266, in which an ICE followed correct error messages.
 !
 ! Contributed by Tobias Burnus <burnus@gcc.gnu.org>

diff --git a/gcc/testsuite/gfortran.dg/alloc_comp_constraint_6.f90 b/gcc/testsuite/gfortran.dg/alloc_comp_constraint_6.f90
index 657b7246dc416a754e73b882eb727dfcaed91928..e2b609aee5a2dddffcef068ccac733bad46be0d9 100644 (file)
--- a/gcc/testsuite/gfortran.dg/alloc_comp_constraint_6.f90
+++ b/gcc/testsuite/gfortran.dg/alloc_comp_constraint_6.f90
@@ -1,4 +1,4 @@
-! { dg-do compile )
+! { dg-do compile }
 ! PR45889 Regression with I/O of element of allocatable array in derived type 
 module cell
   implicit none

diff --git a/gcc/testsuite/gfortran.dg/alloc_comp_init_expr.f03 b/gcc/testsuite/gfortran.dg/alloc_comp_init_expr.f03
index 5e399ac7114b2e6cf4d1b7a0f8dcb86a79bc0916..02ca7fc4e92c1f1f2758d69d8a4d475f213d3b9d 100644 (file)
--- a/gcc/testsuite/gfortran.dg/alloc_comp_init_expr.f03
+++ b/gcc/testsuite/gfortran.dg/alloc_comp_init_expr.f03
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! PR fortran/34402 - allocatable components shall not be
 ! data-initialized in init expr
 

diff --git a/gcc/testsuite/gfortran.dg/allocatable_scalar_11.f90 b/gcc/testsuite/gfortran.dg/allocatable_scalar_11.f90
index 7f4d64d1205084ec93cc188e650aafefaa79f520..b9fb1085760688c91d1ed77e82e33ad00021d3d4 100644 (file)
--- a/gcc/testsuite/gfortran.dg/allocatable_scalar_11.f90
+++ b/gcc/testsuite/gfortran.dg/allocatable_scalar_11.f90
@@ -1,4 +1,4 @@
-! { dg-compile }
+! { dg-do compile }
 !
 ! PR fortran/46484
 !

diff --git a/gcc/testsuite/gfortran.dg/allocate_scalar_with_shape.f90 b/gcc/testsuite/gfortran.dg/allocate_scalar_with_shape.f90
index 1f4f9d52a2ee0121a2a680e0222afc43a563ee6c..0fa9ce1fce9c2d8ea2e4b2bbf956c80ace473e15 100644 (file)
--- a/gcc/testsuite/gfortran.dg/allocate_scalar_with_shape.f90
+++ b/gcc/testsuite/gfortran.dg/allocate_scalar_with_shape.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! PR fortran/41940
 
 integer, allocatable :: a

diff --git a/gcc/testsuite/gfortran.dg/array_function_5.f90 b/gcc/testsuite/gfortran.dg/array_function_5.f90
index 05f3c92d02bc93050f1eef74ae4b2d165ccdff35..9c95f800517869251e0ac19584fd464dd5bef347 100644 (file)
--- a/gcc/testsuite/gfortran.dg/array_function_5.f90
+++ b/gcc/testsuite/gfortran.dg/array_function_5.f90
@@ -1,4 +1,4 @@
-! {  dg-do run )
+! {  dg-do run }
 ! PR41278 internal compiler error related to matmul and transpose
 ! Test case prepared by Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 ! Original test case by Chris <cmklaij@hetnet.nl>

diff --git a/gcc/testsuite/gfortran.dg/asynchronous_3.f03 b/gcc/testsuite/gfortran.dg/asynchronous_3.f03
index 7b83374a6e5ef1f341b6140903810e6672306f06..dfc5e6ea904cc8a8fa0bfe106353258fc6b01c51 100644 (file)
--- a/gcc/testsuite/gfortran.dg/asynchronous_3.f03
+++ b/gcc/testsuite/gfortran.dg/asynchronous_3.f03
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 !
 ! PR fortran/44457 - no array-subscript actual argument
 !                    for an asynchronous dummy

diff --git a/gcc/testsuite/gfortran.dg/char_expr_1.f90 b/gcc/testsuite/gfortran.dg/char_expr_1.f90
index ba0e1f23350c1e4dcf086f33630879c91abdff1d..35bfe3477021e2b09d7e2bdf6cd92d24ae71b464 100644 (file)
--- a/gcc/testsuite/gfortran.dg/char_expr_1.f90
+++ b/gcc/testsuite/gfortran.dg/char_expr_1.f90
@@ -1,4 +1,4 @@
-! { dg-do "run" }
+! { dg-do run }
 ! PR fortran/36795
 ! "(str)" (= an expression) was regarded as "str" (= a variable)
 ! and thus when yy was deallocated so was xx. Result: An invalid

diff --git a/gcc/testsuite/gfortran.dg/class_14.f03 b/gcc/testsuite/gfortran.dg/class_14.f03
index 9b06b01f1ffa3587bdeffe18fcd9f93ab4d9c958..4e6db17c960affabad45e067c2b7b7ce92cc469e 100644 (file)
--- a/gcc/testsuite/gfortran.dg/class_14.f03
+++ b/gcc/testsuite/gfortran.dg/class_14.f03
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! Test the final fix for PR42353, in which a compilation error was
 ! occurring because the derived type of the initializer of the vtab
 ! component '$extends' was not the same as that of the component.

diff --git a/gcc/testsuite/gfortran.dg/data_array_6.f b/gcc/testsuite/gfortran.dg/data_array_6.f
index 6564402f1e9eeba8049ce77629724332860cc742..64b492bc2dac342fdfe88edce965ace9accca785 100644 (file)
--- a/gcc/testsuite/gfortran.dg/data_array_6.f
+++ b/gcc/testsuite/gfortran.dg/data_array_6.f
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 !
 ! PR fortran/38404 - location marker in wrong line
 ! Testcase contributed by Steve Chapel <steve DOT chapel AT a2pg DOT com>

diff --git a/gcc/testsuite/gfortran.dg/data_invalid.f90 b/gcc/testsuite/gfortran.dg/data_invalid.f90
index 10ea7e57c0819505c376a2e693d039946e88422c..960a8f3d3ecb6330030352e21eb2918fab0f8221 100644 (file)
--- a/gcc/testsuite/gfortran.dg/data_invalid.f90
+++ b/gcc/testsuite/gfortran.dg/data_invalid.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-std=f95 -fmax-errors=0" }
 !
 ! Testcases from PR fortran/24978

diff --git a/gcc/testsuite/gfortran.dg/dot_product_1.f03 b/gcc/testsuite/gfortran.dg/dot_product_1.f03
index 5ba663348b1bd59fa6d4d400c69ab5df9acf23a8..45d658526d5a93c1c48fe78104a2bfcaeab7d98b 100644 (file)
--- a/gcc/testsuite/gfortran.dg/dot_product_1.f03
+++ b/gcc/testsuite/gfortran.dg/dot_product_1.f03
@@ -1,4 +1,4 @@
-! { dg-do "run" }
+! { dg-do run }
 ! Transformational intrinsic DOT_PRODUCT as initialization expression.
 
   INTEGER, PARAMETER :: n = 10

diff --git a/gcc/testsuite/gfortran.dg/func_derived_5.f90 b/gcc/testsuite/gfortran.dg/func_derived_5.f90
index afe5ec0ace0aa2bc982f60df8f7a3370cd603f72..76d45a883d82a50c9abe8a8ed94868c10d304fdd 100644 (file)
--- a/gcc/testsuite/gfortran.dg/func_derived_5.f90
+++ b/gcc/testsuite/gfortran.dg/func_derived_5.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! PR fortran/41369 - rejected empty type in function return values
 
 module m

diff --git a/gcc/testsuite/gfortran.dg/func_result_4.f90 b/gcc/testsuite/gfortran.dg/func_result_4.f90
index 81f02a57ca2854dfa9e878c15f94f7d9bc8a3337..c3da2d60fc3d485874b6220118b229c8dcf45765 100644 (file)
--- a/gcc/testsuite/gfortran.dg/func_result_4.f90
+++ b/gcc/testsuite/gfortran.dg/func_result_4.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-c" }
 !
 ! Do not apply the SAVE attribute to function results.

diff --git a/gcc/testsuite/gfortran.dg/implied_do_1.f90 b/gcc/testsuite/gfortran.dg/implied_do_1.f90
index 7f1266c5dc2255a318bfb6bbfd01413c17607d86..d837e8f9f03cd37e40a035d24d9e06a6be8f8744 100644 (file)
--- a/gcc/testsuite/gfortran.dg/implied_do_1.f90
+++ b/gcc/testsuite/gfortran.dg/implied_do_1.f90
@@ -1,4 +1,4 @@
-! { dg-do "run" }
+! { dg-do run }
 ! PR fortran/29458 - spurious warning for implied do-loop counter
 
   integer :: n, i

diff --git a/gcc/testsuite/gfortran.dg/initialization_25.f90 b/gcc/testsuite/gfortran.dg/initialization_25.f90
index fc667f4485ada4c26b848856f14596be20ae1d94..66c447e2f1cbf59c917cc92161051caea560208f 100644 (file)
--- a/gcc/testsuite/gfortran.dg/initialization_25.f90
+++ b/gcc/testsuite/gfortran.dg/initialization_25.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 !
 ! PR fortran/35779 - unrelated error message
 ! Tescase contributed by

diff --git a/gcc/testsuite/gfortran.dg/initialization_26.f90 b/gcc/testsuite/gfortran.dg/initialization_26.f90
index d5bc93b4686abf0e52d3aa0c9eb397927ddf29e2..4532216e12e35fce2c9ed05b83d58ecc16415cf3 100644 (file)
--- a/gcc/testsuite/gfortran.dg/initialization_26.f90
+++ b/gcc/testsuite/gfortran.dg/initialization_26.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 !
 ! Verify that the outer do-loop counter 'j' is accepted as
 ! as end-expression of the inner loop.

diff --git a/gcc/testsuite/gfortran.dg/interface_34.f90 b/gcc/testsuite/gfortran.dg/interface_34.f90
index 3e409d5643fae67f41542b2600251e639b5317ab..880f179e6f0616db694ec7a7b30825be08387612 100644 (file)
--- a/gcc/testsuite/gfortran.dg/interface_34.f90
+++ b/gcc/testsuite/gfortran.dg/interface_34.f90
@@ -1,4 +1,4 @@
-! { dg-compile }
+! { dg-do compile }
 !
 ! PR fortran/47042
 !

diff --git a/gcc/testsuite/gfortran.dg/iso_c_binding_init_expr.f03 b/gcc/testsuite/gfortran.dg/iso_c_binding_init_expr.f03
index 840b60e4eb264d663813fc11dbd6bc6a486333d8..0a0099628b3e3dac3fdf7a0ba368083602fabfc5 100644 (file)
--- a/gcc/testsuite/gfortran.dg/iso_c_binding_init_expr.f03
+++ b/gcc/testsuite/gfortran.dg/iso_c_binding_init_expr.f03
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! PR fortran/42354
 
 use iso_c_binding

diff --git a/gcc/testsuite/gfortran.dg/keyword_symbol_1.f90 b/gcc/testsuite/gfortran.dg/keyword_symbol_1.f90
index 7195f25083745354d675a5b8c5566f24ebbfae28..2661897fff5ba23b1fa269b51a621588dc5a9e16 100644 (file)
--- a/gcc/testsuite/gfortran.dg/keyword_symbol_1.f90
+++ b/gcc/testsuite/gfortran.dg/keyword_symbol_1.f90
@@ -1,4 +1,4 @@
-! ' dg-do compile }
+! { dg-do compile }
 ! This tests the fix for PR28526, in which a public interface named
 ! 'end' would be treated as a variable because the matcher tried
 ! 'END INTERFACE' as an assignment and left the symbol modified in

diff --git a/gcc/testsuite/gfortran.dg/matmul_8.f03 b/gcc/testsuite/gfortran.dg/matmul_8.f03
index d73fdcd07bd6b6e026ddb0e1b8323fcc7a90f4ac..fcd4b0d56b6cf09ca5a29be86686981465ba7fe2 100644 (file)
--- a/gcc/testsuite/gfortran.dg/matmul_8.f03
+++ b/gcc/testsuite/gfortran.dg/matmul_8.f03
@@ -1,4 +1,4 @@
-! { dg-do "run" }
+! { dg-do run }
 ! Transformational intrinsic MATMUL as initialization expression.
 
   REAL, PARAMETER :: PI = 3.141592654, theta = PI/6.0

diff --git a/gcc/testsuite/gfortran.dg/merge_init_expr.f90 b/gcc/testsuite/gfortran.dg/merge_init_expr.f90
index f40f49026cc94c380da933cf2cd79b7fc7249415..c691aa0e325267c86b70993deda3d6af43e8f145 100644 (file)
--- a/gcc/testsuite/gfortran.dg/merge_init_expr.f90
+++ b/gcc/testsuite/gfortran.dg/merge_init_expr.f90
@@ -1,4 +1,4 @@
-! { dg-do "run" }
+! { dg-do run }
 !
 ! Check simplification of MERGE.
 !

diff --git a/gcc/testsuite/gfortran.dg/pack_assign_1.f90 b/gcc/testsuite/gfortran.dg/pack_assign_1.f90
index 4bab0da940e4d02af492e8e7d60fde61683d0537..7c480fc36c7c247df5eeaff02fbdbe2edb251ca7 100644 (file)
--- a/gcc/testsuite/gfortran.dg/pack_assign_1.f90
+++ b/gcc/testsuite/gfortran.dg/pack_assign_1.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! PR32890 - compile-time checks for assigments
 
 INTEGER :: it, neighbrs(42)  ! anything but 30

diff --git a/gcc/testsuite/gfortran.dg/pack_vector_1.f90 b/gcc/testsuite/gfortran.dg/pack_vector_1.f90
index ba3624e7ef5f4ac4259ab5cd6c128e60370b49ff..956bb1636d9b45a5898b3f6c3b736f8e5e025e38 100644 (file)
--- a/gcc/testsuite/gfortran.dg/pack_vector_1.f90
+++ b/gcc/testsuite/gfortran.dg/pack_vector_1.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 !
 ! Check that the VECTOR argument of the PACK intrinsic has at least
 ! as many elements as the MASK has .TRUE. values.

diff --git a/gcc/testsuite/gfortran.dg/pointer_check_8.f90 b/gcc/testsuite/gfortran.dg/pointer_check_8.f90
index b47aa97267759c500c5d0410e0547182d5e22eea..99c6652f211c38ec2117db16df54af375d7cdd85 100644 (file)
--- a/gcc/testsuite/gfortran.dg/pointer_check_8.f90
+++ b/gcc/testsuite/gfortran.dg/pointer_check_8.f90
@@ -1,4 +1,4 @@
-! { dg-do compile}
+! { dg-do compile }
 ! { dg-options "-fcheck=pointer" }
 !
 ! PR 46809: [OOP] ICE with -fcheck=pointer for CLASS IS

diff --git a/gcc/testsuite/gfortran.dg/product_init_expr.f03 b/gcc/testsuite/gfortran.dg/product_init_expr.f03
index 6724eb719f6b45d7b477150ba6d61b8fb4cc75fc..c6ff7e8caf6efce9fb41cfebd53fef8098cb7334 100644 (file)
--- a/gcc/testsuite/gfortran.dg/product_init_expr.f03
+++ b/gcc/testsuite/gfortran.dg/product_init_expr.f03
@@ -1,4 +1,4 @@
-! { dg-do "run" }
+! { dg-do run }
 ! { dg-options "-fno-inline" }
 !
 ! PRODUCT as initialization expression.

diff --git a/gcc/testsuite/gfortran.dg/reshape_order_5.f90 b/gcc/testsuite/gfortran.dg/reshape_order_5.f90
index 9c76b88839fc548fd5e6d627c3c1f1e1b3eeef32..2ef5fce6db8acf02489879347ef4eca8d3db6967 100644 (file)
--- a/gcc/testsuite/gfortran.dg/reshape_order_5.f90
+++ b/gcc/testsuite/gfortran.dg/reshape_order_5.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 !
 ! PR fortran/37203 - check RESHAPE arguments
 !

diff --git a/gcc/testsuite/gfortran.dg/reshape_shape_1.f90 b/gcc/testsuite/gfortran.dg/reshape_shape_1.f90
index 008c9a8e5c1f8cc4e008460a2deb56aae3c8b537..bd5e3cb405c72e4a517192fcfb05da8b36013d64 100644 (file)
--- a/gcc/testsuite/gfortran.dg/reshape_shape_1.f90
+++ b/gcc/testsuite/gfortran.dg/reshape_shape_1.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 !
 ! PR fortran/37203 - check RESHAPE arguments
 !

diff --git a/gcc/testsuite/gfortran.dg/reshape_zerosize_2.f90 b/gcc/testsuite/gfortran.dg/reshape_zerosize_2.f90
index cdbee42aa6c818b718c89b5433d1d34670ff69c2..474ea300d1cc88e64316fb77816f0b2e6b038399 100644 (file)
--- a/gcc/testsuite/gfortran.dg/reshape_zerosize_2.f90
+++ b/gcc/testsuite/gfortran.dg/reshape_zerosize_2.f90
@@ -1,4 +1,4 @@
-! { dg-do "run" }
+! { dg-do run }
 
   ! Simplifier of RESHAPE was broken when reshaping an empty array.
   INTEGER, PARAMETER :: empty(0,0) = RESHAPE(SHAPE(1), (/0, 0/))

diff --git a/gcc/testsuite/gfortran.dg/same_name_2.f90 b/gcc/testsuite/gfortran.dg/same_name_2.f90
index 948ff757baeeb96042c1f62b9e16ffa8c48ca978..c8da3e1dbbff9f2d5e55c01d4fcbcb183d6d65c9 100644 (file)
--- a/gcc/testsuite/gfortran.dg/same_name_2.f90
+++ b/gcc/testsuite/gfortran.dg/same_name_2.f90
@@ -1,4 +1,4 @@
-! ( dg-do compile }
+! { dg-do compile }
 ! Tests the fix for PR27701, in which two same name procedures
 ! were not diagnosed if they had no arguments.
 !

diff --git a/gcc/testsuite/gfortran.dg/selected_real_kind_1.f90 b/gcc/testsuite/gfortran.dg/selected_real_kind_1.f90
index 0f40a595d2f73c68afae71cebc242a8272f71385..f771f9a2ea63980baabb6dc6130b402ee93680de 100644 (file)
--- a/gcc/testsuite/gfortran.dg/selected_real_kind_1.f90
+++ b/gcc/testsuite/gfortran.dg/selected_real_kind_1.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 !
 ! PR fortran/44347 - arguments of SELECTED_REAL_KIND shall be scalar
 ! Testcase contributed by Vittorio Zecca <zeccav AT gmail DOT com>

diff --git a/gcc/testsuite/gfortran.dg/spread_init_expr.f03 b/gcc/testsuite/gfortran.dg/spread_init_expr.f03
index a8bdc5e19ee5c4451b09ca5d9620c41b5751e2b6..05714f623edcb50a745723369484d2dab25c20d8 100644 (file)
--- a/gcc/testsuite/gfortran.dg/spread_init_expr.f03
+++ b/gcc/testsuite/gfortran.dg/spread_init_expr.f03
@@ -1,4 +1,4 @@
-! { dg-do "run" }
+! { dg-do run }
 
   INTEGER, PARAMETER :: n = 5
   INTEGER, PARAMETER :: a1(n) = SPREAD(1, 1, n)

diff --git a/gcc/testsuite/gfortran.dg/stmt_func_1.f90 b/gcc/testsuite/gfortran.dg/stmt_func_1.f90
index 072f21b1b6362cc4705e73e8e4d35927b9843021..472d7d78c6afdd1fffdf1b0f2968aebfbc693dc0 100644 (file)
--- a/gcc/testsuite/gfortran.dg/stmt_func_1.f90
+++ b/gcc/testsuite/gfortran.dg/stmt_func_1.f90
@@ -1,4 +1,4 @@
-! { dg-compile }
+! { dg-do compile }
 ! { dg-options "" }
 !
 ! PR fortran/47542

diff --git a/gcc/testsuite/gfortran.dg/sum_init_expr.f03 b/gcc/testsuite/gfortran.dg/sum_init_expr.f03
index 9071a41f43c2760272e7229f4086da6a6cf6ac07..f0cfe958b51658adc6a7239717e4d846ccf4a761 100644 (file)
--- a/gcc/testsuite/gfortran.dg/sum_init_expr.f03
+++ b/gcc/testsuite/gfortran.dg/sum_init_expr.f03
@@ -1,4 +1,4 @@
-! { dg-do "run" }
+! { dg-do run }
 ! { dg-options "-fno-inline" }
 !
 ! SUM as initialization expression.

diff --git a/gcc/testsuite/gfortran.dg/transpose_3.f03 b/gcc/testsuite/gfortran.dg/transpose_3.f03
index b24516604c97451dad5f5b5aba16a4a59e6346e2..269db491d86fc42c6107e629716375f021f42194 100644 (file)
--- a/gcc/testsuite/gfortran.dg/transpose_3.f03
+++ b/gcc/testsuite/gfortran.dg/transpose_3.f03
@@ -1,4 +1,4 @@
-! { dg-do "run" }
+! { dg-do run }
 ! Transformational intrinsic TRANSPOSE as initialization expression.
 
   INTEGER, PARAMETER :: n = 10

diff --git a/gcc/testsuite/gfortran.dg/unpack_init_expr.f03 b/gcc/testsuite/gfortran.dg/unpack_init_expr.f03
index 78460d19a633c0610201c6d5063926cad0e52a9b..924694cadafdb9ce7c21345290dec0959de48070 100644 (file)
--- a/gcc/testsuite/gfortran.dg/unpack_init_expr.f03
+++ b/gcc/testsuite/gfortran.dg/unpack_init_expr.f03
@@ -1,4 +1,4 @@
-! { dg-do "run" }
+! { dg-do run }
 !
 ! Example from F2003, sec 13.7.125
 !

diff --git a/gcc/testsuite/gfortran.dg/warn_conversion.f90 b/gcc/testsuite/gfortran.dg/warn_conversion.f90
index c8f0e23e2ffd10cf5e62b4115a93c0cf77c7693c..e9b7e396e4f098398b3751d7340f118709334418 100644 (file)
--- a/gcc/testsuite/gfortran.dg/warn_conversion.f90
+++ b/gcc/testsuite/gfortran.dg/warn_conversion.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-Wconversion" }
 
 !

diff --git a/gcc/testsuite/gfortran.dg/warn_conversion_2.f90 b/gcc/testsuite/gfortran.dg/warn_conversion_2.f90
index c0222983a0fb6932ffdeb1b1674d129c7cb7565f..d2b4eec6049ca7df8b74f6ecb1da6cdf7d5f8ea2 100644 (file)
--- a/gcc/testsuite/gfortran.dg/warn_conversion_2.f90
+++ b/gcc/testsuite/gfortran.dg/warn_conversion_2.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-Wconversion-extra" }
 
   real(8) :: sqrt2

diff --git a/gcc/testsuite/gfortran.dg/warn_intent_out_not_set.f90 b/gcc/testsuite/gfortran.dg/warn_intent_out_not_set.f90
index 52b23154c3cc6d901eea48b85cb19a67bdd028b3..76c62eaec34630648ab06bf66056c09ab8618e16 100644 (file)
--- a/gcc/testsuite/gfortran.dg/warn_intent_out_not_set.f90
+++ b/gcc/testsuite/gfortran.dg/warn_intent_out_not_set.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-c -Wall" }
 !
 ! PR fortran/42360

diff --git a/gcc/testsuite/gfortran.dg/warn_unused_dummy_argument_1.f90 b/gcc/testsuite/gfortran.dg/warn_unused_dummy_argument_1.f90
index 94e74c9362872070cdc769a7e83ab40ee9680c8e..66b0f1a58335fb854fc4cb12cf08d8c33b038d51 100644 (file)
--- a/gcc/testsuite/gfortran.dg/warn_unused_dummy_argument_1.f90
+++ b/gcc/testsuite/gfortran.dg/warn_unused_dummy_argument_1.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-Wall" }
 !
 ! PR fortran/38407

diff --git a/gcc/testsuite/gfortran.dg/warn_unused_dummy_argument_2.f90 b/gcc/testsuite/gfortran.dg/warn_unused_dummy_argument_2.f90
index 85472dddda2f4f9a9385c3eed630aa0655fd27f2..6a2233ba084c06163b3179a875884192ef7afc54 100644 (file)
--- a/gcc/testsuite/gfortran.dg/warn_unused_dummy_argument_2.f90
+++ b/gcc/testsuite/gfortran.dg/warn_unused_dummy_argument_2.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-Wall -Wno-unused-dummy-argument" }
 !
 ! PR fortran/38407

diff --git a/gcc/testsuite/gfortran.dg/whole_file_16.f90 b/gcc/testsuite/gfortran.dg/whole_file_16.f90
index 2a17d0b1dcb348539fe6bbd2a58966188308de6a..048350f1d7e3a2e376de795adee8430428870451 100644 (file)
--- a/gcc/testsuite/gfortran.dg/whole_file_16.f90
+++ b/gcc/testsuite/gfortran.dg/whole_file_16.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-fwhole-file" }
 !
 ! PR fortran/31346

diff --git a/gcc/testsuite/gfortran.dg/whole_file_17.f90 b/gcc/testsuite/gfortran.dg/whole_file_17.f90
index deaddf95ae632218c4fbc457dbc111e9de34934c..86272b848a82c5ab3aff04d656374231844fce6a 100644 (file)
--- a/gcc/testsuite/gfortran.dg/whole_file_17.f90
+++ b/gcc/testsuite/gfortran.dg/whole_file_17.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-fwhole-file" }
 !
 ! PR fortran/30668

diff --git a/gcc/testsuite/gfortran.dg/whole_file_18.f90 b/gcc/testsuite/gfortran.dg/whole_file_18.f90
index fac15d6ca4f763a39df8a34bd6b61c5c402fe0eb..f758408f81e3e6368536fb450e9010f255c02615 100644 (file)
--- a/gcc/testsuite/gfortran.dg/whole_file_18.f90
+++ b/gcc/testsuite/gfortran.dg/whole_file_18.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-fwhole-file -Wno-unused-dummy-argument" }
 !
 ! PR fortran/34260

diff --git a/gcc/testsuite/gfortran.dg/whole_file_20.f03 b/gcc/testsuite/gfortran.dg/whole_file_20.f03
index 231a5aaf283c72189a11b5308fb2e0d6e65403c9..61e2a4df9d84004f340714ca7668433374879a18 100644 (file)
--- a/gcc/testsuite/gfortran.dg/whole_file_20.f03
+++ b/gcc/testsuite/gfortran.dg/whole_file_20.f03
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-fwhole-file -fcoarray=single" }
 !
 ! Procedures with dummy arguments that are coarrays or polymorphic

diff --git a/gcc/testsuite/gfortran.dg/whole_file_5.f90 b/gcc/testsuite/gfortran.dg/whole_file_5.f90
index 0ba8ffe21401d2747ea042e87e271708772ca431..34240c9f3215cbdfba4c7947cc538827cff47903 100644 (file)
--- a/gcc/testsuite/gfortran.dg/whole_file_5.f90
+++ b/gcc/testsuite/gfortran.dg/whole_file_5.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-O3 -fwhole-file -fdump-tree-optimized" }
 ! { dg-add-options bind_pic_locally }
 !

diff --git a/gcc/testsuite/gfortran.dg/whole_file_6.f90 b/gcc/testsuite/gfortran.dg/whole_file_6.f90
index 266c289f541219dce74b6fedbe1beb8cf8e2001e..1d92bc3600922f191fc8bcff99cb15a170a0001b 100644 (file)
--- a/gcc/testsuite/gfortran.dg/whole_file_6.f90
+++ b/gcc/testsuite/gfortran.dg/whole_file_6.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! { dg-options "-O3 -fwhole-file -fdump-tree-optimized" }
 ! { dg-add-options bind_pic_locally }
 !

diff --git a/gcc/testsuite/gfortran.dg/write_invalid_format.f90 b/gcc/testsuite/gfortran.dg/write_invalid_format.f90
index fb60313ef07443abf4a9f4d01542b420ff73a7df..8de7bc25ced9d84b8d0c5dafdc18bcf597ab5705 100644 (file)
--- a/gcc/testsuite/gfortran.dg/write_invalid_format.f90
+++ b/gcc/testsuite/gfortran.dg/write_invalid_format.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! PR fortran/35582 - ICE on invalid format
 ! Testcase contributed by
 ! Leandro Martinez <leandromartinez DOT spam AT gmail DOT com> 

diff --git a/gcc/testsuite/gfortran.dg/zero_sized_6.f90 b/gcc/testsuite/gfortran.dg/zero_sized_6.f90
index 30ed8dfaaf5c539fc23aa1e7877867309924df47..f944fd91444309a3596763be0beac8e630bbf34f 100644 (file)
--- a/gcc/testsuite/gfortran.dg/zero_sized_6.f90
+++ b/gcc/testsuite/gfortran.dg/zero_sized_6.f90
@@ -1,4 +1,4 @@
-! { dg-do "compile" }
+! { dg-do compile }
 ! PR38709 - ICE-on-invalid on zero-sized array in init-expr.
 
   INTEGER, PARAMETER :: a(1) = (/ 1 /)