* [Committed] Fix Fortran testsuite failures
@ 2018-05-21 19:21 Steve Kargl
0 siblings, 0 replies; only message in thread
From: Steve Kargl @ 2018-05-21 19:21 UTC (permalink / raw)
To: fortran, gcc-patches
[-- Attachment #1: Type: text/plain, Size: 541 bytes --]
I've committed the attached patch, which fixes a few testsuite
failures related to changes in how gfortran handles legacy code.
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.
PS: Yes, I forgot a ChangLog entry. I'll commit that in a minute.
--
Steve
[-- Attachment #2: followup.diff --]
[-- Type: text/x-diff, Size: 2195 bytes --]
Index: gcc/testsuite/gfortran.dg/graphite/block-2.f
===================================================================
--- gcc/testsuite/gfortran.dg/graphite/block-2.f (revision 260479)
+++ gcc/testsuite/gfortran.dg/graphite/block-2.f (working copy)
@@ -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)
Index: gcc/testsuite/gfortran.dg/graphite/id-19.f
===================================================================
--- gcc/testsuite/gfortran.dg/graphite/id-19.f (revision 260479)
+++ gcc/testsuite/gfortran.dg/graphite/id-19.f (working copy)
@@ -1,3 +1,5 @@
+! { dg-do compile }
+! { dg-options "-std=legacy" }
SUBROUTINE ECCODR(FPQR)
DIMENSION FPQR(25,25,25)
INTEGER P,Q,R
Index: gcc/testsuite/gfortran.dg/graphite/id-20.f
===================================================================
--- gcc/testsuite/gfortran.dg/graphite/id-20.f (revision 260479)
+++ gcc/testsuite/gfortran.dg/graphite/id-20.f (working copy)
@@ -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
Index: gcc/testsuite/gfortran.dg/graphite/id-27.f90
===================================================================
--- gcc/testsuite/gfortran.dg/graphite/id-27.f90 (revision 260479)
+++ gcc/testsuite/gfortran.dg/graphite/id-27.f90 (working copy)
@@ -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), &
Index: gcc/testsuite/gfortran.dg/graphite/pr82449.f
===================================================================
--- gcc/testsuite/gfortran.dg/graphite/pr82449.f (revision 260479)
+++ gcc/testsuite/gfortran.dg/graphite/pr82449.f (working copy)
@@ -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)
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2018-05-21 19:21 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2018-05-21 19:21 [Committed] Fix Fortran testsuite failures Steve Kargl
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).