Update to Netlib version of 1999-06-28, doc fix

From-SVN: r27816

gcc/f/ChangeLog

+Mon Jun 28 21:31:35 1999  Craig Burley  <craig@jcb-sc.com>
+
+	* bugs.texi, news.texi: Doc upgrade to netlib libf2c as of today.
+	Explain that this fixes the NAMELIST-read bug.
+
 Fri Jun 25 11:06:32 1999  Craig Burley  <craig@jcb-sc.com>
 
 	* bugs.texi: Describe K(5)=10*3 NAMELIST-read bug.

gcc/f/bugs.texi

@@ -9,7 +9,7 @@
 @c in the standalone derivations of this file (e.g. BUGS).
 @set copyrights-bugs 1995-1999
 
-@set last-update-bugs 1999-06-25
+@set last-update-bugs 1999-06-28
 
 @include root.texi
 
@@ -98,17 +98,6 @@ The following information was last updated on @value{last-update-bugs}:
 
 @itemize @bullet
 @item
-Input to a @code{NAMELIST} read involving a repeat count,
-such as @samp{K(5)=10*3},
-is not properly handled by @code{libf2c}.
-The first item is written to @samp{K(5)},
-but the remaining nine are written elsewhere (still within the array),
-not necessarily starting at @samp{K(6)}.
-
-A fix is pending, certainly for @code{gcc} 3.0,
-perhaps for 2.96 if such a release is made.
-
-@item
 @code{g77} fails to warn about
 use of a ``live'' iterative-DO variable
 as an implied-DO variable

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-18
+@set last-update-news 1999-06-28
 
 @include root.texi
 
@@ -161,7 +161,15 @@ if the system has no @code{ttyname} implementation available.
 
 @ifclear USERVISONLY
 @item
-Upgrade to @code{libf2c} as of 1999-06-18.
+Upgrade to @code{libf2c} as of 1999-06-28.
+
+This fixes a bug whereby
+input to a @code{NAMELIST} read involving a repeat count,
+such as @samp{K(5)=10*3},
+was not properly handled by @code{libf2c}.
+The first item was written to @samp{K(5)},
+but the remaining nine were written elsewhere (still within the array),
+not necessarily starting at @samp{K(6)}.
 @end ifclear
 @end itemize
 

libf2c/ChangeLog

+Mon Jun 28 21:27:08 1999  Craig Burley  <craig@jcb-sc.com>
+
+	Update to Netlib version of 1999-06-28:
+	* changes.netlib, libI77/Version.c, libI77/rsne.c
+	readme.netlib: See changes.netlib for info.
+
 Fri Jun 18 11:38:07 1999  Craig Burley  <craig@jcb-sc.com>
 
 	* libU77/ttynam_.c: if !defined (HAVE_TTYNAM),

libf2c/changes.netlib

@@ -3019,3 +3019,8 @@ 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.)
+
+Sun Jun 27 22:05:47 EDT 1999
+  libf2c.zip, libi77: rsne.c: fix bug in namelist input: a misplaced
+increment could cause wrong array elements to be assigned; e.g.,
+"&input k(5)=10*1 &end" assigned k(5) and k(15 .. 23).

libf2c/libI77/Version.c

-static char junk[] = "\n@(#) LIBI77 VERSION pjw,dmg-mods 19990618\n";
+static char junk[] = "\n@(#) LIBI77 VERSION pjw,dmg-mods 19990627\n";
 
 /*
 */
@@ -302,6 +302,9 @@ wrtfmt.c:
 		 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 */
+/* 27 June 1999: rsne.c: fix bug in namelist input: a misplaced increment */
+/*		 could cause wrong array elements to be assigned; e.g.,	*/
+/*		 "&input k(5)=10*1 &end" assigned k(5) and k(15..23)	*/
 
 
 

libf2c/libI77/rsne.c

@@ -530,10 +530,10 @@ x_rsne(cilist *a)
 					no1 = (ivae - iva)/size;
 					if (no1 > f__lcount)
 						no1 = f__lcount;
-					iva += no1 * dn0->delta;
 					if (k = l_read(&no1, vaddr + iva,
 							size, type))
 						return k;
+					iva += no1 * dn0->delta;
 					}
 				}
  mustend:

libf2c/readme.netlib

@@ -719,6 +719,12 @@ Fri Jun 18 02:33:08 EDT 1999
 -- b->ufd may change in t_runc().  (For now, it's still backspace.c
 in the libi77 bundle.)
 
+Sun Jun 27 22:05:47 EDT 1999
+  libf2c.zip, libi77: rsne.c: fix bug in namelist input: a misplaced
+increment could cause wrong array elements to be assigned; e.g.,
+"&input k(5)=10*1 &end" assigned k(5) and k(15 .. 23).
+
+
 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