diff options
| -rw-r--r-- | libf2c/ChangeLog | 8 | ||||
| -rw-r--r-- | libf2c/libU77/Version.c | 2 | ||||
| -rw-r--r-- | libf2c/libU77/date_.c | 5 |
3 files changed, 12 insertions, 3 deletions
diff --git a/libf2c/ChangeLog b/libf2c/ChangeLog index b51430ae917..e09d8bfbba0 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 21:27:08 1999 Craig Burley <craig@jcb-sc.com> Update to Netlib version of 1999-06-28: diff --git a/libf2c/libU77/Version.c b/libf2c/libU77/Version.c index d4b509b4fe3..2003f3c05e9 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 11537657f32..4f8254d3740 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 (); |
