aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorSteven G. Kargl <kargl@gcc.gnu.org>2018-05-21 19:19:25 +0000
committerSteven G. Kargl <kargl@gcc.gnu.org>2018-05-21 19:19:25 +0000
commitea81ff50fdffd9f5891900649ee7330ade896799 (patch)
treeb21755d3cf429977e485d08c851c0baccf230f0d /gcc
parentb02923592a55b52d796656c5b4f34a964a2604a9 (diff)
downloadgcc-ea81ff50fdffd9f5891900649ee7330ade896799.zip
gcc-ea81ff50fdffd9f5891900649ee7330ade896799.tar.gz
gcc-ea81ff50fdffd9f5891900649ee7330ade896799.tar.bz2
block-2.f: Adjust testcase for new gfortran warnings for deleted and obsolescent features.
2018-05-21 Steven G. Kargl <kargl@gcc.gnu.org> * gfortran.dg/graphite/block-2.f: Adjust testcase for new gfortran warnings for deleted and obsolescent features. * gfortran.dg/graphite/id-19.f: Ditto. * gfortran.dg/graphite/id-20.f: Ditto. * gfortran.dg/graphite/id-27.f90: Ditto. * gfortran.dg/graphite/pr82449.f: Ditto. From-SVN: r260480
Diffstat (limited to 'gcc')
-rw-r--r--gcc/testsuite/gfortran.dg/graphite/block-2.f2
-rw-r--r--gcc/testsuite/gfortran.dg/graphite/id-19.f2
-rw-r--r--gcc/testsuite/gfortran.dg/graphite/id-20.f2
-rw-r--r--gcc/testsuite/gfortran.dg/graphite/id-27.f903
-rw-r--r--gcc/testsuite/gfortran.dg/graphite/pr82449.f2
5 files changed, 8 insertions, 3 deletions
diff --git a/gcc/testsuite/gfortran.dg/graphite/block-2.f b/gcc/testsuite/gfortran.dg/graphite/block-2.f
index 1789af5..4e479f3 100644
--- a/gcc/testsuite/gfortran.dg/graphite/block-2.f
+++ b/gcc/testsuite/gfortran.dg/graphite/block-2.f
@@ -1,3 +1,5 @@
+! { dg-do compile }
+! { dg-options "-std=legacy" }
SUBROUTINE MATRIX_MUL_UNROLLED (A, B, C, L, M, N)
DIMENSION A(L,M), B(M,N), C(L,N)
diff --git a/gcc/testsuite/gfortran.dg/graphite/id-19.f b/gcc/testsuite/gfortran.dg/graphite/id-19.f
index e05f764..2001f9f 100644
--- a/gcc/testsuite/gfortran.dg/graphite/id-19.f
+++ b/gcc/testsuite/gfortran.dg/graphite/id-19.f
@@ -1,3 +1,5 @@
+! { dg-do compile }
+! { dg-options "-std=legacy" }
SUBROUTINE ECCODR(FPQR)
DIMENSION FPQR(25,25,25)
INTEGER P,Q,R
diff --git a/gcc/testsuite/gfortran.dg/graphite/id-20.f b/gcc/testsuite/gfortran.dg/graphite/id-20.f
index 795cb1b..d31360d 100644
--- a/gcc/testsuite/gfortran.dg/graphite/id-20.f
+++ b/gcc/testsuite/gfortran.dg/graphite/id-20.f
@@ -1,4 +1,4 @@
-! { dg-options "-O3 -ffast-math" }
+! { dg-options "-O3 -ffast-math -std=legacy" }
DIMENSION FPQR(25,25,25)
INTEGER P,Q,R
diff --git a/gcc/testsuite/gfortran.dg/graphite/id-27.f90 b/gcc/testsuite/gfortran.dg/graphite/id-27.f90
index e1e7ec0..0a18687 100644
--- a/gcc/testsuite/gfortran.dg/graphite/id-27.f90
+++ b/gcc/testsuite/gfortran.dg/graphite/id-27.f90
@@ -1,4 +1,5 @@
-! { dg-additional-options "-Ofast" }
+! { dg-do compile }
+! { dg-additional-options "-Ofast -std=legacy" }
MODULE module_ra_gfdleta
INTEGER, PARAMETER :: NBLY=15
REAL , SAVE :: EM1(28,180),EM1WDE(28,180),TABLE1(28,180), &
diff --git a/gcc/testsuite/gfortran.dg/graphite/pr82449.f b/gcc/testsuite/gfortran.dg/graphite/pr82449.f
index 974ea20..641ed74 100644
--- a/gcc/testsuite/gfortran.dg/graphite/pr82449.f
+++ b/gcc/testsuite/gfortran.dg/graphite/pr82449.f
@@ -1,5 +1,5 @@
! { dg-do compile }
-! { dg-options "-O2 -floop-nest-optimize" }
+! { dg-options "-O2 -floop-nest-optimize -std=legacy" }
SUBROUTINE JDFIDX(MKL,KGSH)
DIMENSION MKL(6,6)