mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-03-19 05:10:25 +08:00
Code Issues Packages Projects Releases Wiki Activity

testsuite: Fix up pr107397.f90 test [PR107397]

Browse Source 
The pr107397.f90 test FAILs for me, one problem was that the
added diagnostics has an indefinite article before BOZ, but
the test dg-error didn't.  The other problem was that on the
other dg-error there was no space between the string and closing
}, so it was completely ignored and the error was an excess
error.

2022-12-19  Jakub Jelinek  <jakub@redhat.com>

	PR fortran/107397
	* gfortran.dg/pr107397.f90: Adjust expected diagnostic wording and
	add space between dg-error string and closing }.
This commit is contained in:
Jakub Jelinek 2022-12-19 11:24:55 +01:00
parent f39b7a4d37
commit 03fb35f875
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/testsuite/gfortran.dg/pr107397.f90
View File

@ -4,6 +4,6 @@ program p
type t
real :: a = 1.0
end type
type(t), parameter :: x = z'1' ! { dg-error "incompatible with BOZ" }
x%a = x%a + 2 ! { dg-error "has no IMPLICIT type"}
type(t), parameter :: x = z'1' ! { dg-error "incompatible with a BOZ" }
x%a = x%a + 2 ! { dg-error "has no IMPLICIT type" }
end