This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug libfortran/31099] [4.3/4.2 regression] Runtime error on legal code using RECL
- From: "jvdelisle at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 9 Mar 2007 23:55:26 -0000
- Subject: [Bug libfortran/31099] [4.3/4.2 regression] Runtime error on legal code using RECL
- References: <bug-31099-10259@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #8 from jvdelisle at gcc dot gnu dot org 2007-03-09 23:55 -------
Subject: Bug 31099
Author: jvdelisle
Date: Fri Mar 9 23:55:17 2007
New Revision: 122773
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=122773
Log:
2007-03-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/31099
* io/open.c (new_unit): Initialize bytes_left and recl_subrecord.
* io/transfer.c (next_record_w): Set bytes left to record length for
sequential unformatted I/O.
(next_record_r): Ditto.
(read_block_direct): Fix test for exceeding bytes_left.
Modified:
branches/gcc-4_2-branch/libgfortran/ChangeLog
branches/gcc-4_2-branch/libgfortran/io/open.c
branches/gcc-4_2-branch/libgfortran/io/transfer.c
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31099