This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
Re: [PATCH] PR fortran/78240 -- kludge of the day
On Tue, Nov 14, 2017 at 05:21:41PM -0500, Fritz Reese wrote:
> On Tue, Nov 14, 2017 at 4:58 PM, Janus Weil <janus@gcc.gnu.org> wrote:
> > Hi guys,
> >
> > I see this new test case failing on x86_64-linux-gnu:
> >
> > FAIL: gfortran.dg/pr78240.f90 -O (test for excess errors)
> >
> >
> > $ gfortran-8 pr78240.f90
> > pr78240.f90:11:12:
> >
> > integer x(n) /1/ ! { dg-error "Nonconstant array" }
> > 1
> > Error: Variable ‘n’ cannot appear in the expression at (1)
> > pr78240.f90:11:14:
> >
> > integer x(n) /1/ ! { dg-error "Nonconstant array" }
> > 1
> > Error: The module or main program array ‘x’ at (1) must have constant shape
> > pr78240.f90:11:19:
> >
> > integer x(n) /1/ ! { dg-error "Nonconstant array" }
> > 1
> > Error: Nonconstant array section at (1) in DATA statement
> > [...]
>
> ... does anyone know how to tell dejagnu to expect multiple errors on
> a single line?
>
I've fixed the problem with this patch.
2017-11-15 Steven G. Kargl <kargl@gcc.gnu.org>
PR fortran/78240
gfortran.dg/pr78240.f90: Prune run-on errors.
Index: gcc/testsuite/gfortran.dg/pr78240.f90
===================================================================
--- gcc/testsuite/gfortran.dg/pr78240.f90 (revision 254779)
+++ gcc/testsuite/gfortran.dg/pr78240.f90 (working copy)
@@ -1,4 +1,5 @@
! { dg-do compile }
+! { dg-options "-w" }
!
! PR fortran/78240
!
@@ -8,5 +9,7 @@
!
program p
- integer x(n) /1/ ! { dg-error "Nonconstant array" }
+ integer x(n) /1/ ! { dg-error "cannot appear in the expression" }
end
+! { dg-prune-output "module or main program" }
+! { dg-prune-output "Nonconstant array" }
--
Steve