From ac02f3128fbd565fba2abd94ec3a0754b992e5fb Mon Sep 17 00:00:00 2001 From: Craig Burley Date: Fri, 18 Jun 1999 08:31:20 +0000 Subject: [PATCH] Update to Netlib version of 1999-06-18 From-SVN: r27593 --- gcc/f/ChangeLog | 5 +++++ gcc/f/news.texi | 10 +++++++++- libf2c/ChangeLog | 6 ++++++ libf2c/changes.netlib | 5 +++++ libf2c/libI77/Version.c | 3 ++- libf2c/libI77/backspace.c | 5 +++-- libf2c/readme.netlib | 7 ++++++- 7 files changed, 36 insertions(+), 5 deletions(-) diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog index 0b5f73c6551..64e0ad361d2 100644 --- a/gcc/f/ChangeLog +++ b/gcc/f/ChangeLog @@ -1,3 +1,8 @@ +Fri Jun 18 11:26:50 1999 Craig Burley + + * news.texi: New heading for development version. + Doc upgrade to netlib libf2c as of today. + Wed Jun 16 11:43:02 1999 Craig Burley * news.texi: Mention BACKSPACE fix to libg2c. diff --git a/gcc/f/news.texi b/gcc/f/news.texi index 9f20e65bf43..1b03f403210 100644 --- a/gcc/f/news.texi +++ b/gcc/f/news.texi @@ -9,7 +9,7 @@ @c in the standalone derivations of this file (e.g. NEWS). @set copyrights-news 1995-1999 -@set last-update-news 1999-06-16 +@set last-update-news 1999-06-18 @include root.texi @@ -151,6 +151,14 @@ is available at The following information was last updated on @value{last-update-news}: +@heading In development: +@itemize @bullet +@ifclear USERVISONLY +@item +Upgrade to @code{libf2c} as of 1999-06-18. +@end ifclear +@end itemize + @heading In 0.5.25, @code{GCC} 2.95 (@code{EGCS} 1.2) versus @code{EGCS} 1.1.2: @itemize @bullet @ifclear USERVISONLY diff --git a/libf2c/ChangeLog b/libf2c/ChangeLog index c8666c674d8..00f3a65ca32 100644 --- a/libf2c/ChangeLog +++ b/libf2c/ChangeLog @@ -1,3 +1,9 @@ +Fri Jun 18 11:22:21 1999 Craig Burley + + 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 * libI77/backspace.c: Undo Wednesday's change, in diff --git a/libf2c/changes.netlib b/libf2c/changes.netlib index a5252202bdb..b0e67532230 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 b501174b790..6a09b70ca2e 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 1da686dbb48..1968801aab7 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 406a753cf30..0b8b7f7ee43 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