gcc/libgfortran/io
Jerry DeLisle 701306112e re PR fortran/29053 (Consecutive STREAM I/O file positions mixed up)
2006-09-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libgfortran/29053
	* io.h (gfc_unit): Add variable, strm_pos, to track
	STREAM I/O file position.
	* file_pos.c (st_rewind): Set strm_pos to beginning.
	* open.c (new_unit): Initialize strm_pos.
	* read.c (read_x): Bump strm_pos.
	* inquire.c (inquire_via_unit): Return strm_pos value.
	* transfer.c (read_block),(read_block_direct),(write_block)
	(write_buf): Seek to strm_pos - 1.  Update strm_pos when done.
	(pre_position): Initialize strm_pos.
	(data_transfer_init): Set strm_pos if DT_HAS_REC.
	(finalize_transfer): Flush file, no need to update strm_pos.

From-SVN: r116970
2006-09-15 13:16:15 +00:00
..
close.c re PR fortran/28335 (flush() / write() statement on closed units - error?) 2006-07-31 00:15:08 +00:00
file_pos.c re PR fortran/29053 (Consecutive STREAM I/O file positions mixed up) 2006-09-15 13:16:15 +00:00
format.c re PR libfortran/27704 (Incorrect runtime error on multiple OPEN) 2006-07-04 01:36:31 +00:00
inquire.c re PR fortran/29053 (Consecutive STREAM I/O file positions mixed up) 2006-09-15 13:16:15 +00:00
io.h re PR fortran/29053 (Consecutive STREAM I/O file positions mixed up) 2006-09-15 13:16:15 +00:00
list_read.c re PR libfortran/27704 (Incorrect runtime error on multiple OPEN) 2006-07-04 01:36:31 +00:00
lock.c
open.c re PR fortran/29053 (Consecutive STREAM I/O file positions mixed up) 2006-09-15 13:16:15 +00:00
read.c re PR fortran/29053 (Consecutive STREAM I/O file positions mixed up) 2006-09-15 13:16:15 +00:00
size_from_kind.c
transfer.c re PR fortran/29053 (Consecutive STREAM I/O file positions mixed up) 2006-09-15 13:16:15 +00:00
unit.c re PR fortran/25828 ([f2003] ACCESS='STREAM' io support) 2006-08-15 23:06:44 +00:00
unix.c re PR libfortran/27757 (Problems with direct access io) 2006-05-29 23:39:53 +00:00
unix.h
write.c re PR libfortran/28354 ([4.1 Only] 0.99999 printed as 0. instead of 1. by format(f3.0)) 2006-08-28 05:14:05 +00:00