This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: [Patch, libgfortran] [4.4/4.5 Regression] Endless loop in internal write
- From: Thomas Koenig <tkoenig at netcologne dot de>
- To: Jerry DeLisle <jvdelisle at verizon dot net>
- Cc: fortran at gcc dot gnu dot org, gcc-patches at gcc dot gnu dot org
- Date: Tue, 30 Jun 2009 19:32:45 +0200
- Subject: Re: [Patch, libgfortran] [4.4/4.5 Regression] Endless loop in internal write
- References: <4A495F02.8060301@verizon.net>
Hi Jerry,
I committed the following test case as obvious to 4.5 (and HJ backported
it to 4.4 before I could, thanks):
2009-06-30 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/40576
* gfortran.dg/internal_write_1.f90: New testcase.
Thanks for the quick fix!
Thomas
! { dg-do run }
! { dg-shouldfail "End of file" }
program main
character(len=20) :: line
integer, dimension(4) :: n
n = 1
write(line,'(2I2)') n
end program main
! { dg-output "Fortran runtime error: End of file" }