This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
[patch fortran] PR 13919 - Runtime "internal error" in IO
- From: Bud Davis <bdavis9659 at comcast dot net>
- To: gcc-patches at gcc dot gnu dot org, gfortran <fortran at gcc dot gnu dot org>
- Date: Fri, 20 Feb 2004 19:04:16 -0600
- Subject: [patch fortran] PR 13919 - Runtime "internal error" in IO
the segfault was caused by a
Index: gcc/libgfortran/io/transfer.c
===================================================================
RCS file: /cvs/gcc/gcc/libgfortran/io/Attic/transfer.c,v
retrieving revision 1.1.2.7
diff -c -3 -p -r1.1.2.7 transfer.c
*** gcc/libgfortran/io/transfer.c 7 Feb 2004 15:33:29 -0000 1.1.2.7
--- gcc/libgfortran/io/transfer.c 11 Feb 2004 02:01:46 -0000
*************** finalize_transfer (void)
*** 1306,1312 ****
if (current_unit == NULL)
return;
! if (ioparm.list_format && g.mode == READING)
finish_list_read ();
else
{
--- 1306,1312 ----
if (current_unit == NULL)
return;
! if (ioparm.list_format && g.mode == READING && current_unit->endfile
== NO_ENDFILE)
finish_list_read ();
else
{