Update to Netlib version of 1999-06-18

From-SVN: r27593

gcc/f/ChangeLog

@@ -1,3 +1,8 @@
+Fri Jun 18 11:26:50 1999  Craig Burley  <craig@jcb-sc.com>
+
+	* news.texi: New heading for development version.
+	Doc upgrade to netlib libf2c as of today.
+
 Wed Jun 16 11:43:02 1999  Craig Burley  <craig@jcb-sc.com>
 
 	* news.texi: Mention BACKSPACE fix to libg2c.

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

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

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.)

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 */
 
 
 

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);

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