From: David M. Gay <dmg@bell-labs.com>
Date: Mon, 24 Jan 2000 19:59:21 +0000 (+0000)
Subject: David M. Gay <dmg@bell-labs.com>:
X-Git-Tag: prereleases/gcc-2.95.3-test1~94
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=d4cf4f9a18d40f7db0a9fe2a654b9b214d71a41c;p=thirdparty%2Fgcc.git

David M. Gay <dmg@bell-labs.com>:

	* libI77/endfile.c (t_runc): set state to writing
	(b->uwrt = 1) when an endfile statement requires copying the file.

From-SVN: r31590
---

diff --git a/libf2c/ChangeLog b/libf2c/ChangeLog
index 4e9eccc84661..c3ca9a9043ba 100644
--- a/libf2c/ChangeLog
+++ b/libf2c/ChangeLog
@@ -1,3 +1,8 @@
+Mon Jan 24 20:28:35 CET 2000  David M. Gay <dmg@bell-labs.com>
+
+	* libI77/endfile.c (t_runc): set state to writing
+	(b->uwrt = 1) when an endfile statement requires copying the file.
+
 Sun Oct 24 23:54:10 PDT 1999 Jeff Law  (law@cygnus.com)
 
 	* gcc-2.95.2 Released.
diff --git a/libf2c/libI77/endfile.c b/libf2c/libI77/endfile.c
index 0e4ac0318e9f..03853de6e688 100644
--- a/libf2c/libI77/endfile.c
+++ b/libf2c/libI77/endfile.c
@@ -103,6 +103,7 @@ t_runc(alist *a)
 	rewind(tf);
 	if (copy(tf, loc, bf))
 		goto bad1;
+	b->urwt = 1;
 	b->urw = 2;
 #ifdef NON_UNIX_STDIO
 	if (b->ufmt) {