diff options
author | Steven G. Kargl <kargl@gcc.gnu.org> | 2018-05-21 19:19:25 +0000 |
---|---|---|
committer | Steven G. Kargl <kargl@gcc.gnu.org> | 2018-05-21 19:19:25 +0000 |
commit | ea81ff50fdffd9f5891900649ee7330ade896799 (patch) | |
tree | b21755d3cf429977e485d08c851c0baccf230f0d /gcc | |
parent | b02923592a55b52d796656c5b4f34a964a2604a9 (diff) | |
download | gcc-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.f | 2 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/graphite/id-19.f | 2 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/graphite/id-20.f | 2 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/graphite/id-27.f90 | 3 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/graphite/pr82449.f | 2 |
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) |