diff options
| author | tv <tv@NetBSD.org> | 1999-04-06 16:20:26 +0000 |
|---|---|---|
| committer | tv <tv@NetBSD.org> | 1999-04-06 16:20:26 +0000 |
| commit | 5a74f4e7d42b2fc0c6cbe3496e6d462c1196fb64 (patch) | |
| tree | 8b5f97c8f9e11e1a456bc25e09d779cf27a49cb7 /gnu | |
| parent | d2833781e6b78b812702bba59358121bd07b2249 (diff) | |
Import libf2c from egcs 1.1.2.
Diffstat (limited to 'gnu')
| -rw-r--r-- | gnu/dist/libf2c/libI77/Version.c | 2 | ||||
| -rw-r--r-- | gnu/dist/libf2c/libU77/Version.c | 2 | ||||
| -rw-r--r-- | gnu/dist/libf2c/libU77/datetime_.c | 8 | ||||
| -rw-r--r-- | gnu/dist/libf2c/libU77/lstat_.c | 1 | ||||
| -rw-r--r-- | gnu/dist/libf2c/libU77/vxtidate_.c | 2 |
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; |
