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 21:51:48 -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 #7 from jvdelisle at gcc dot gnu dot org 2007-03-09 21:51 -------
Subject: Bug 31099
Author: jvdelisle
Date: Fri Mar 9 21:51:39 2007
New Revision: 122763
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=122763
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:
trunk/libgfortran/ChangeLog
trunk/libgfortran/io/open.c
trunk/libgfortran/io/transfer.c
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31099