Message ID | trinity-97b0f00a-c0ee-49fe-ad01-b4bd4fe74810-1709067614727@3c-app-gmx-bap21 |
---|---|
State | New |
Headers | show |
Series | Fortran testsuite: fix invalid Fortran in testcase | expand |
On 2/27/24 1:00 PM, Harald Anlauf wrote: > Dear all, > > the attached patch fixes invalid Fortran in testcase > gfortran.dg/pr101026.f, which might prohibit progress > in fixing pr111781. (Note that the testcase was for a > tree-optimizer issue, not the Fortran frontend.) > > OK for mainline? > > Will commit within 24h unless there are comments. > > Thanks, > Harald > OK, simple.
From 75724b6b42a1c46383d8e6deedbfb8d2ebd0fa12 Mon Sep 17 00:00:00 2001 From: Harald Anlauf <anlauf@gmx.de> Date: Tue, 27 Feb 2024 21:51:53 +0100 Subject: [PATCH] Fortran testsuite: fix invalid Fortran in testcase gcc/testsuite/ChangeLog: * gfortran.dg/pr101026.f: Let variables used in specification expression be passed as dummy arguments --- gcc/testsuite/gfortran.dg/pr101026.f | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/testsuite/gfortran.dg/pr101026.f b/gcc/testsuite/gfortran.dg/pr101026.f index 9576d8802ca..e05e21c898a 100644 --- a/gcc/testsuite/gfortran.dg/pr101026.f +++ b/gcc/testsuite/gfortran.dg/pr101026.f @@ -1,6 +1,6 @@ ! { dg-do compile } ! { dg-options "-Ofast -frounding-math" } - SUBROUTINE PASSB4 (CC,CH) + SUBROUTINE PASSB4 (CC,CH,IDO,L1) DIMENSION CC(IDO,4,L1), CH(IDO,L1,*) DO 103 I=2,IDO,2 TI4 = CC0-CC(I,4,K) -- 2.35.3