aboutsummaryrefslogtreecommitdiff
path: root/libf2c
diff options
context:
space:
mode:
authorCraig Burley <craig@jcb-sc.com>1999-06-18 08:31:20 +0000
committerCraig Burley <burley@gcc.gnu.org>1999-06-18 04:31:20 -0400
commitac02f3128fbd565fba2abd94ec3a0754b992e5fb (patch)
tree634c97de9a4af201ddfce249dc99d6b91687f4ad /libf2c
parentbd3a74ea25aefc068c8b5653991492cdfce4b8a9 (diff)
downloadgcc-ac02f3128fbd565fba2abd94ec3a0754b992e5fb.zip
gcc-ac02f3128fbd565fba2abd94ec3a0754b992e5fb.tar.gz
gcc-ac02f3128fbd565fba2abd94ec3a0754b992e5fb.tar.bz2
Update to Netlib version of 1999-06-18
From-SVN: r27593
Diffstat (limited to 'libf2c')
-rw-r--r--libf2c/ChangeLog6
-rw-r--r--libf2c/changes.netlib5
-rw-r--r--libf2c/libI77/Version.c3
-rw-r--r--libf2c/libI77/backspace.c5
-rw-r--r--libf2c/readme.netlib7
5 files changed, 22 insertions, 4 deletions
diff --git a/libf2c/ChangeLog b/libf2c/ChangeLog
index c8666c6..00f3a65 100644
--- a/libf2c/ChangeLog
+++ b/libf2c/ChangeLog
@@ -1,3 +1,9 @@
+Fri Jun 18 11:22:21 1999 Craig Burley <craig@jcb-sc.com>
+
+ Update to Netlib version of 1999-05-10:
+ * changes.netlib, libI77/Version.c, libI77/backspace.c
+ readme.netlib: See changes.netlib for info.
+
Fri Jun 18 11:15:24 1999 Craig Burley <craig@jcb-sc.com>
* libI77/backspace.c: Undo Wednesday's change, in
diff --git a/libf2c/changes.netlib b/libf2c/changes.netlib
index a525220..b0e6753 100644
--- a/libf2c/changes.netlib
+++ b/libf2c/changes.netlib
@@ -3014,3 +3014,8 @@ Mon May 3 13:14:07 EDT 1999
libf2c; two new casts in libf2c/open.c that matter with 64-bit longs,
and one more tweak (libf2c/c_log.c) for pathological equivalences.
Minor update to "fc" script: new -L flag and comment correction.
+
+Fri Jun 18 02:33:08 EDT 1999
+ libf2c.zip: rename backspace.c backspac.c, and fix a glitch in it
+-- b->ufd may change in t_runc(). (For now, it's still backspace.c
+in the libi77 bundle.)
diff --git a/libf2c/libI77/Version.c b/libf2c/libI77/Version.c
index b501174..6a09b70 100644
--- a/libf2c/libI77/Version.c
+++ b/libf2c/libI77/Version.c
@@ -1,4 +1,4 @@
-static char junk[] = "\n@(#) LIBI77 VERSION pjw,dmg-mods 19990503\n";
+static char junk[] = "\n@(#) LIBI77 VERSION pjw,dmg-mods 19990618\n";
/*
*/
@@ -301,6 +301,7 @@ wrtfmt.c:
rdfmt.c: omit fixed-length buffer that could be overwritten
by formats Inn or Lnn with nn > 83. */
/* 3 May 1999: open.c: insert two casts for machines with 64-bit longs. */
+/* 18 June 1999: backspace.c: allow for b->ufd changing in t_runc */
diff --git a/libf2c/libI77/backspace.c b/libf2c/libI77/backspace.c
index 1da686d..1968801 100644
--- a/libf2c/libI77/backspace.c
+++ b/libf2c/libI77/backspace.c
@@ -17,7 +17,7 @@ integer f_back(alist *a)
if(a->aunit >= MXUNIT || a->aunit < 0)
err(a->aerr,101,"backspace");
if(b->useek==0) err(a->aerr,106,"backspace");
- if((f = b->ufd) == NULL) {
+ if(b->ufd == NULL) {
fk_open(1, 1, a->aunit);
return(0);
}
@@ -26,10 +26,11 @@ integer f_back(alist *a)
return(0);
}
if(b->uwrt) {
- (void) t_runc(a);
+ t_runc(a);
if (f__nowreading(b))
err(a->aerr,errno,"backspace");
}
+ f = b->ufd; /* may have changed in t_runc() */
if(b->url>0)
{
x=ftell(f);
diff --git a/libf2c/readme.netlib b/libf2c/readme.netlib
index 406a753..0b8b7f7 100644
--- a/libf2c/readme.netlib
+++ b/libf2c/readme.netlib
@@ -711,9 +711,14 @@ and one more tweak (libf2c/c_log.c) for pathological equivalences.
Minor update to "fc" script: new -L flag and comment correction.
Tue May 4 10:06:26 EDT 1999
- libf77, libf2c.zip: forgot to copy yesterday's latest updates to
+ libf77, libf2c.zip: forgot to copy yesterday's latest updates to
netlib.
+Fri Jun 18 02:33:08 EDT 1999
+ libf2c.zip: rename backspace.c backspac.c, and fix a glitch in it
+-- b->ufd may change in t_runc(). (For now, it's still backspace.c
+in the libi77 bundle.)
+
Current timestamps of files in "all from f2c/src", sorted by time,
appear below (mm/dd/year hh:mm:ss). To bring your source up to date,
obtain source files with a timestamp later than the time shown in your