From: Thomas Koenig Date: Fri, 12 Aug 2005 20:02:43 +0000 (+0000) Subject: eoshift.f90: Correct format. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=68c41a6cc47494d33bd07ea414ba9e42f8b96352;p=gcc.git eoshift.f90: Correct format. 2005-08-12 Thomas Koenig * gfortran.dg/eoshift.f90: Correct format. From-SVN: r103045 --- diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 39ec91f6841..c54ba51d97c 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2005-08-12 Thomas Koenig + + * gfortran.dg/eoshift.f90: Correct format. + 2005-08-12 Thomas Koenig * gfortran.fortran-torture/execute/character_passing.f90: diff --git a/gcc/testsuite/gfortran.dg/eoshift.f90 b/gcc/testsuite/gfortran.dg/eoshift.f90 index bb1cba4712d..ae7643bfd8f 100644 --- a/gcc/testsuite/gfortran.dg/eoshift.f90 +++ b/gcc/testsuite/gfortran.dg/eoshift.f90 @@ -2,5 +2,5 @@ ! PR 18958: We used to segfault for eoshifting off the end of an array. program main character(len=20) line - write (line,'(I4)') eoshift((/1, 3/), 3) + write (line,'(2I4)') eoshift((/1, 3/), 3) end program main