OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

unix.c: Remove parts of patch of 2005/10/07 that cause input from the terminal to hang. 

2005-10-12  Janne Blomqvist <jblomqvi@cc.hut.fi>

	* io/unix.c: Remove parts of patch of 2005/10/07 that cause
	input from the terminal to hang.

From-SVN: r105324
This commit is contained in:
Janne Blomqvist 2005-10-12 22:54:59 +03:00 committed by Paul Thomas
parent 9f92185eb9
commit 4def9c5307
2 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
libgfortran/ChangeLog
View File

@ -1,3 +1,8 @@
2005-10-12 Janne Blomqvist <jblomqvi@cc.hut.fi>
* io/unix.c: Remove parts of patch of 2005/10/07 that cause
input from the terminal to hang.
2005-10-11 Steven G. Kargl <kargls@comcast.net>
PR libgfortran/24313

6
libgfortran/io/unix.c
View File

@ -440,7 +440,7 @@ static char *
fd_alloc_r_at (unix_stream * s, int *len, gfc_offset where)
{
gfc_offset m;
size_t n;
int n;
if (where == -1)
where = s->logical_offset;
@ -462,8 +462,8 @@ fd_alloc_r_at (unix_stream * s, int *len, gfc_offset where)
if (s->physical_offset != m && lseek (s->fd, m, SEEK_SET) < 0)
return NULL;
n = s->len - s->active;
if (do_read (s, s->buffer + s->active, &n) != 0)
n = read (s->fd, s->buffer + s->active, s->len - s->active);
if (n < 0)
return NULL;
s->physical_offset = where + n;