summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorburley <burley@138bc75d-0d04-0410-961f-82ee72b054a4>1999-06-16 09:00:35 +0000
committerburley <burley@138bc75d-0d04-0410-961f-82ee72b054a4>1999-06-16 09:00:35 +0000
commit422d5a3a2747e4d3ecfd29f6bbf74f4fda90dbbb (patch)
treec2da84d1333f5ea66218c04c03b578eed6d59b5c
parent8323bf8c3d758266c5219d54511d747118a2cafa (diff)
downloadppe42-gcc-422d5a3a2747e4d3ecfd29f6bbf74f4fda90dbbb.tar.gz
ppe42-gcc-422d5a3a2747e4d3ecfd29f6bbf74f4fda90dbbb.zip
fix BACKSPACE
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@27541 138bc75d-0d04-0410-961f-82ee72b054a4
-rw-r--r--libf2c/ChangeLog7
-rw-r--r--libf2c/libI77/Version.c2
-rw-r--r--libf2c/libI77/backspace.c1
3 files changed, 9 insertions, 1 deletions
diff --git a/libf2c/ChangeLog b/libf2c/ChangeLog
index 43ebb7a6c39..360c91f3db7 100644
--- a/libf2c/ChangeLog
+++ b/libf2c/ChangeLog
@@ -1,3 +1,10 @@
+Wed Jun 16 11:38:58 1999 Craig Burley <craig@jcb-sc.com>
+
+ From Ian Watson <WATSON_IAN_A@Lilly.com> 1999-06-12:
+ * libI77/backspace.c: Reload file descriptor after
+ calling t_runc.
+ * libI77/Version.c: Bump libg2c version.
+
Wed May 26 14:26:35 1999 Craig Burley <craig@jcb-sc.com>
* libF77/Version.c, libI77/Version.c, libU77/Version.c:
diff --git a/libf2c/libI77/Version.c b/libf2c/libI77/Version.c
index 12da19b1915..b501174b790 100644
--- a/libf2c/libI77/Version.c
+++ b/libf2c/libI77/Version.c
@@ -3,7 +3,7 @@ static char junk[] = "\n@(#) LIBI77 VERSION pjw,dmg-mods 19990503\n";
/*
*/
-char __G77_LIBI77_VERSION__[] = "0.5.25 19981012 (prerelease)";
+char __G77_LIBI77_VERSION__[] = "0.5.25 19990616 (prerelease)";
/*
2.01 $ format added
diff --git a/libf2c/libI77/backspace.c b/libf2c/libI77/backspace.c
index 1da686dbb48..eca1708a3c8 100644
--- a/libf2c/libI77/backspace.c
+++ b/libf2c/libI77/backspace.c
@@ -27,6 +27,7 @@ integer f_back(alist *a)
}
if(b->uwrt) {
(void) t_runc(a);
+ f = b->ufd; /* t_runc might change b->ufd */
if (f__nowreading(b))
err(a->aerr,errno,"backspace");
}
OpenPOWER on IntegriCloud