array_function_5.f90: Fix a dg directive.

2019-01-22  Manfred Schwarb  <manfred99@gmx.ch>

	* gfortran.dg/array_function_5.f90: Fix a dg directive.
	* gfortran.dg/block_16.f08: Likewise.
	* gfortran.dg/dec_structure_14.f90: Likewise.
	* gfortran.dg/namelist_96.f90: Likewise.
	* gfortran.dg/newunit_5.f90.f90: Moved to
	* gfortran.dg/newunit_5.f90: here.
	* gfortran.dg/pdt_28.f03: Likewise.
	* gfortran.dg/spread_simplify_1.f90: Likewise.

From-SVN: r268148

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index bbf04da..1b61a3d 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,14 @@
+2019-01-22  Manfred Schwarb  <manfred99@gmx.ch>
+
+       * gfortran.dg/array_function_5.f90: Fix a dg directive.
+       * gfortran.dg/block_16.f08: Likewise.
+       * gfortran.dg/dec_structure_14.f90: Likewise.
+       * gfortran.dg/namelist_96.f90: Likewise.
+       * gfortran.dg/newunit_5.f90.f90: Moved to
+       * gfortran.dg/newunit_5.f90: here.
+       * gfortran.dg/pdt_28.f03: Likewise.
+       * gfortran.dg/spread_simplify_1.f90: Likewise.
+
 2019-01-22  Tamar Christina  <tamar.christina@arm.com>
 
        PR/tree-optimization 88903

diff --git a/gcc/testsuite/gfortran.dg/array_function_5.f90 b/gcc/testsuite/gfortran.dg/array_function_5.f90
index c5e5aa0..7ac97f0 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/block_16.f08 b/gcc/testsuite/gfortran.dg/block_16.f08
index 165c719..e3b904f 100644 (file)
--- a/gcc/testsuite/gfortran.dg/block_16.f08
+++ b/gcc/testsuite/gfortran.dg/block_16.f08
@@ -1,4 +1,4 @@
-! { dg-do compile )
+! { dg-do compile }
 ! PR82009  [F08] ICE with block construct
 MODULE sparse_matrix_csx_benchmark_utils
   IMPLICIT NONE

diff --git a/gcc/testsuite/gfortran.dg/dec_structure_14.f90 b/gcc/testsuite/gfortran.dg/dec_structure_14.f90
index 4e271b7..0079e6c 100644 (file)
--- a/gcc/testsuite/gfortran.dg/dec_structure_14.f90
+++ b/gcc/testsuite/gfortran.dg/dec_structure_14.f90
@@ -1,4 +1,4 @@
-  ! { dg-do "compile" }
+  ! { dg-do compile }
   ! { dg-options "-fdec-structure" }
   !
   ! Test that structures inside a common block do not require the

diff --git a/gcc/testsuite/gfortran.dg/namelist_96.f90 b/gcc/testsuite/gfortran.dg/namelist_96.f90
index 5606e1f..9a956ee 100644 (file)
--- a/gcc/testsuite/gfortran.dg/namelist_96.f90
+++ b/gcc/testsuite/gfortran.dg/namelist_96.f90
@@ -1,4 +1,4 @@
-! ( dg-do run }
+! { dg-do run }
 program pr88776
   implicit none
   character(*), parameter :: file = "pr88776.dat"

diff --git a/gcc/testsuite/gfortran.dg/newunit_5.f90.f90 b/gcc/testsuite/gfortran.dg/newunit_5.f90
similarity index 96%
rename from gcc/testsuite/gfortran.dg/newunit_5.f90.f90
rename to gcc/testsuite/gfortran.dg/newunit_5.f90
index de3eb00..8821b9f 100644 (file)
--- a/gcc/testsuite/gfortran.dg/newunit_5.f90.f90
+++ b/gcc/testsuite/gfortran.dg/newunit_5.f90
@@ -1,4 +1,4 @@
-! { dg-do run )
+! { dg-do run }
 ! PR83525 Combination of newunit and internal unit was failing.
 program main
   integer :: funit

diff --git a/gcc/testsuite/gfortran.dg/pdt_28.f03 b/gcc/testsuite/gfortran.dg/pdt_28.f03
index c0dc1a0..de68791 100644 (file)
--- a/gcc/testsuite/gfortran.dg/pdt_28.f03
+++ b/gcc/testsuite/gfortran.dg/pdt_28.f03
@@ -1,5 +1,5 @@
 ! { dg-do run }
-! ( dg-options "-fbounds-check" }
+! { dg-options "-fbounds-check" }
 !
 ! Test the fix for PR83731, where the following failed on the check for the
 ! value of the parameter 'k'.

diff --git a/gcc/testsuite/gfortran.dg/spread_simplify_1.f90 b/gcc/testsuite/gfortran.dg/spread_simplify_1.f90
index afc254a..ba28639 100644 (file)
--- a/gcc/testsuite/gfortran.dg/spread_simplify_1.f90
+++ b/gcc/testsuite/gfortran.dg/spread_simplify_1.f90
@@ -1,4 +1,4 @@
-! { dg-do  run  }
+! { dg-do run }
 ! PR 68426 - simplification used to fail.
   module m
     implicit none