From 7765789968f0b70449347d233c3d845501dba67b Mon Sep 17 00:00:00 2001 From: Tobias Burnus Date: Thu, 27 Aug 2009 13:59:51 +0200 Subject: [PATCH] re PR fortran/28039 (Warn when ignoring extra characters in the format specification) 2009-08-27 Tobias Burnus PR fortran/28039 * gfortran.dg/fmt_with_extra.f: xfail testcase as patch was * reverted. From-SVN: r151141 --- gcc/testsuite/ChangeLog | 5 +++++ gcc/testsuite/gfortran.dg/fmt_with_extra.f | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index ad8b144ae6e5..379012fed277 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2009-08-27 Tobias Burnus + + PR fortran/28039 + * gfortran.dg/fmt_with_extra.f: xfail testcase as patch was reverted. + 2009-08-27 Daniel Kraft PR fortran/37425 diff --git a/gcc/testsuite/gfortran.dg/fmt_with_extra.f b/gcc/testsuite/gfortran.dg/fmt_with_extra.f index 45664be906f9..9782882cde96 100644 --- a/gcc/testsuite/gfortran.dg/fmt_with_extra.f +++ b/gcc/testsuite/gfortran.dg/fmt_with_extra.f @@ -4,5 +4,5 @@ implicit none real :: r r = 1.0 - write(*,'(a),f)') 'Hello', r !{ dg-warning "Extraneous characters in format at" } + write(*,'(a),f)') 'Hello', r ! { dg-warning "Extraneous characters in format at" "PR28039" { xfail *-*-* } } end -- 2.47.2