summaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authortv <tv@NetBSD.org>1999-04-06 16:20:26 +0000
committertv <tv@NetBSD.org>1999-04-06 16:20:26 +0000
commit5a74f4e7d42b2fc0c6cbe3496e6d462c1196fb64 (patch)
tree8b5f97c8f9e11e1a456bc25e09d779cf27a49cb7 /gnu
parentd2833781e6b78b812702bba59358121bd07b2249 (diff)
Import libf2c from egcs 1.1.2.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/dist/libf2c/libI77/Version.c2
-rw-r--r--gnu/dist/libf2c/libU77/Version.c2
-rw-r--r--gnu/dist/libf2c/libU77/datetime_.c8
-rw-r--r--gnu/dist/libf2c/libU77/lstat_.c1
-rw-r--r--gnu/dist/libf2c/libU77/vxtidate_.c2
5 files changed, 10 insertions, 5 deletions
diff --git a/gnu/dist/libf2c/libI77/Version.c b/gnu/dist/libf2c/libI77/Version.c
index 9d80fb92ed8..1a5acc24219 100644
--- a/gnu/dist/libf2c/libI77/Version.c
+++ b/gnu/dist/libf2c/libI77/Version.c
@@ -3,7 +3,7 @@ static char junk[] = "\n@(#) LIBI77 VERSION pjw,dmg-mods 19980617\n";
/*
*/
-char __G77_LIBI77_VERSION__[] = "0.5.24-19980920";
+char __G77_LIBI77_VERSION__[] = "0.5.24-19981021";
/*
2.01 $ format added
diff --git a/gnu/dist/libf2c/libU77/Version.c b/gnu/dist/libf2c/libU77/Version.c
index fd2527ce859..6fb0b42b55b 100644
--- a/gnu/dist/libf2c/libU77/Version.c
+++ b/gnu/dist/libf2c/libU77/Version.c
@@ -1,6 +1,6 @@
static char junk[] = "\n@(#) LIBU77 VERSION 19980709\n";
-char __G77_LIBU77_VERSION__[] = "0.5.24";
+char __G77_LIBU77_VERSION__[] = "0.5.24-19990305";
#include <stdio.h>
diff --git a/gnu/dist/libf2c/libU77/datetime_.c b/gnu/dist/libf2c/libU77/datetime_.c
index 4b5d28ae36c..35f0d1cdf74 100644
--- a/gnu/dist/libf2c/libU77/datetime_.c
+++ b/gnu/dist/libf2c/libU77/datetime_.c
@@ -32,6 +32,12 @@ Boston, MA 02111-1307, USA. */
#endif
#include "f2c.h"
+#ifdef KR_headers
+VOID s_copy ();
+#else
+void s_copy(register char *a, register char *b, ftnlen la, ftnlen lb);
+#endif
+
int G77_date_and_time_0 (char *date, char *fftime, char *zone,
integer *values, ftnlen date_len,
ftnlen fftime_len, ftnlen zone_len)
@@ -58,7 +64,7 @@ int G77_date_and_time_0 (char *date, char *fftime, char *zone,
struct timeval tp;
struct timezone tzp;
if (! gettimeofday (&tp, &tzp))
- vals[7] = tp.tv_usec;
+ vals[7] = tp.tv_usec/1000;
}
#endif
if (values) /* null pointer for missing optional */
diff --git a/gnu/dist/libf2c/libU77/lstat_.c b/gnu/dist/libf2c/libU77/lstat_.c
index e3efce7c55b..801f6aad1af 100644
--- a/gnu/dist/libf2c/libU77/lstat_.c
+++ b/gnu/dist/libf2c/libU77/lstat_.c
@@ -69,7 +69,6 @@ integer G77_lstat_0 (const char *name, integer statb[13], const ftnlen Lname)
statb[8] = buf.st_atime;
statb[9] = buf.st_mtime;
statb[10] = buf.st_ctime;
- statb[6] = 0;
#if HAVE_ST_BLKSIZE
statb[11] = buf.st_blksize;
#else
diff --git a/gnu/dist/libf2c/libU77/vxtidate_.c b/gnu/dist/libf2c/libU77/vxtidate_.c
index c517f29419e..03133ffa2ff 100644
--- a/gnu/dist/libf2c/libU77/vxtidate_.c
+++ b/gnu/dist/libf2c/libU77/vxtidate_.c
@@ -48,7 +48,7 @@ int G77_vxtidate_0 (integer *m, integer *d, integer *y)
time_t tim;
tim = time(NULL);
lt = localtime(&tim);
- *y = lt->tm_year;
+ *y = lt->tm_year % 100;
*m = lt->tm_mon+1;
*d = lt->tm_mday;
return 0;