This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/31618] backspace intrinsic is not working on an unformatted file
- From: "tkoenig at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 23 Apr 2007 19:44:09 -0000
- Subject: [Bug fortran/31618] backspace intrinsic is not working on an unformatted file
- References: <bug-31618-11696@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #8 from tkoenig at gcc dot gnu dot org 2007-04-23 20:44 -------
Subject: Bug 31618
Author: tkoenig
Date: Mon Apr 23 20:43:54 2007
New Revision: 124079
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=124079
Log:
2007-04-23 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/31618
* io/transfer.c (read_block_direct): Instead of calling us_read,
set dtp->u.p.current_unit->current_record = 0 so that pre_position
will read the record marker.
(data_transfer_init): For different error conditions, call
generate_error, then return.
2007-04-23 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/31618
* gfortran.dg/backspace_8.f: New test case.
Added:
trunk/gcc/testsuite/gfortran.dg/backspace_8.f
Modified:
trunk/gcc/testsuite/ChangeLog
trunk/libgfortran/ChangeLog
trunk/libgfortran/io/transfer.c
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31618