From 75b81dcdad7b41fb6cc9d0fa6064966c2016ce96 Mon Sep 17 00:00:00 2001 From: Thomas Koenig Date: Tue, 20 Feb 2018 19:53:42 +0000 Subject: structure_constructor_14.f90: Adjust STOP number. 2018-02-20 Thomas Koenig * gfortran.dg/structure_constructor_14.f90: Adjust STOP number. From-SVN: r257859 --- gcc/testsuite/ChangeLog | 4 ++++ gcc/testsuite/gfortran.dg/structure_constructor_14.f90 | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) (limited to 'gcc') diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 035e48d..a726016 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,5 +1,9 @@ 2018-02-20 Thomas Koenig + * gfortran.dg/structure_constructor_14.f90: Adjust STOP number. + +2018-02-20 Thomas Koenig + PR fortran/48890 PR fortran/83823 * gfortran.dg/structure_constructor_14.f90: New test. diff --git a/gcc/testsuite/gfortran.dg/structure_constructor_14.f90 b/gcc/testsuite/gfortran.dg/structure_constructor_14.f90 index b889206..10626f2 100644 --- a/gcc/testsuite/gfortran.dg/structure_constructor_14.f90 +++ b/gcc/testsuite/gfortran.dg/structure_constructor_14.f90 @@ -20,5 +20,5 @@ program gfcbug145 write(line,'(20(a8,:,"|"))') pack (obstyp% name, mask) if (line /= 'SYNOP |DRIBU |TEMP |RADAR') STOP 1 write (line,'("|",A,"|")') x - if (line /= "|asdf |") STOP 1 + if (line /= "|asdf |") STOP 2 end program gfcbug145 -- cgit v1.1