From: Craig Burley <craig@jcb-sc.com>
Date: Thu, 8 Jul 1999 12:19:58 +0000 (+0000)
Subject: date_.c (G77_date_y2kbug_0): G77_time_0 returns longint...
X-Git-Tag: prereleases/gcc-2.95-test~63
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=60c2b0f1f07b09a83fab01d97d3f3e506c9ca7c5;p=thirdparty%2Fgcc.git

date_.c (G77_date_y2kbug_0): G77_time_0 returns longint...

        * libU77/date_.c (G77_date_y2kbug_0): G77_time_0 returns
        longint, not integer, and G77_ctime_0 takes longint, not
        integer, argument.
        * libU77/Version.c: Bump version.

From-SVN: r28012
---

diff --git a/libf2c/ChangeLog b/libf2c/ChangeLog
index b532aac2645c..fb3977f04027 100644
--- a/libf2c/ChangeLog
+++ b/libf2c/ChangeLog
@@ -1,3 +1,11 @@
+Wed Jul  7 15:58:16 1999  Craig Burley  <craig@jcb-sc.com>
+
+	* libU77/date_.c (G77_date_y2kbug_0): G77_time_0 returns
+	longint, not integer, and G77_ctime_0 takes longint, not
+	integer, argument.
+
+	* libU77/Version.c: Bump version.
+
 Mon Jun 28 10:22:30 1999  Craig Burley  <craig@jcb-sc.com>
 
 	* libI77/rsne.c: Fix NAMELIST bug by applying 19990627
diff --git a/libf2c/libU77/Version.c b/libf2c/libU77/Version.c
index d4b509b4fe36..2003f3c05e91 100644
--- a/libf2c/libU77/Version.c
+++ b/libf2c/libU77/Version.c
@@ -1,6 +1,6 @@
 static char junk[] = "\n@(#) LIBU77 VERSION 19980709\n";
 
-char __G77_LIBU77_VERSION__[] = "0.5.25 19990507 (prerelease)";
+char __G77_LIBU77_VERSION__[] = "0.5.25 19990707 (prerelease)";
 
 #include <stdio.h>
 
diff --git a/libf2c/libU77/date_.c b/libf2c/libU77/date_.c
index 11537657f329..4f8254d37408 100644
--- a/libf2c/libU77/date_.c
+++ b/libf2c/libU77/date_.c
@@ -13,7 +13,8 @@ static integer c__5 = 5;
 {
     /* System generated locals */
     address a__1[5];
-    integer i__1, i__2[5];
+    longint i__1;
+    integer i__2[5];
     char ch__1[24];
 
     /* Builtin functions */
@@ -21,7 +22,7 @@ static integer c__5 = 5;
 
     /* Local variables */
     static char cbuf[24];
-    extern integer G77_time_0 ();
+    extern longint G77_time_0 ();
     extern /* Character */ VOID G77_ctime_0 ();
 
     i__1 = G77_time_0 ();