The following testcase from gfortran.dg/g77/1832.f runs successfully with
gfortran. With g77 it goes into a spin cycle.
This was discovered while testing new patches for array_io in 4.1 branch. With
new patches, gfortran correctly gives am end-of-record error.
Test case should be dropped or revised for new correct error message.
c { dg-do run }
character*120 file
character*5 string
file = "c:/dos/adir/bdir/cdir/text.doc"
write(string, *) "a ", file
if (string .ne. ' a') call abort
C-- The leading space is normal for list-directed output
C-- "file" is not printed because it would overflow "string".
end
--
Summary: gfortran incorrectly succeeds on record overflow
Product: gcc
Version: 4.1.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: libfortran
AssignedTo: jvdelisle at verizon dot net
ReportedBy: jvdelisle at verizon dot net
CC: gcc-bugs at gcc dot gnu dot org
GCC host triplet: i686-pc-linux-gnu
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=23760