X-Git-Url: http://git.sourceforge.jp/view?a=blobdiff_plain;f=libf2c%2FlibI77%2FVersion.c;h=cca2ef57dee4032cacdeb2d3760e49ebed9e279d;hb=630307c88c8750470a712aad7c0f3ac7460f577f;hp=b352f32675a61eeb6e9f2a12bb4af7949df67b99;hpb=288b323d1bf6927d17831294c194bc211137088a;p=pf3gnuchains%2Fgcc-fork.git

diff --git a/libf2c/libI77/Version.c b/libf2c/libI77/Version.c
index b352f32675a..cca2ef57dee 100644
--- a/libf2c/libI77/Version.c
+++ b/libf2c/libI77/Version.c
@@ -1,9 +1,9 @@
-static char junk[] = "\n@(#) LIBI77 VERSION pjw,dmg-mods 19990627\n";
+static char junk[] = "\n@(#) LIBI77 VERSION pjw,dmg-mods 19991115\n";
 
 /*
 */
 
-char __G77_LIBI77_VERSION__[] = "0.5.25 20000301 (prerelease)";
+char __G77_LIBI77_VERSION__[] = "0.5.25 20000529 (prerelease)";
 
 /*
 2.01	$ format added
@@ -305,6 +305,15 @@ wrtfmt.c:
 /* 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)	*/
+/* 15 Nov. 1999: endfile.c: set state to writing (b->uwrt = 1) when an */
+/*		endfile statement requires copying the file. */
+/*		(Otherwise an immediately following rewind statement */
+/*		could make the file appear empty.)  Also, supply a */
+/*		missing (long) cast in the sprintf call. */
+/*		 sfe.c: add #ifdef ALWAYS_FLUSH logic, for formatted I/O: */
+/*		Compiling libf2c with -DALWAYS_FLUSH should prevent losing */
+/*		any data in buffers should the program fault.  It also */
+/*		makes the program run more slowly. */