diff options
| author | Craig Burley <craig@jcb-sc.com> | 1999-02-20 14:55:52 +0000 |
|---|---|---|
| committer | Craig Burley <burley@gcc.gnu.org> | 1999-02-20 09:55:52 -0500 |
| commit | 9074cde5dba88960ac90bb3fea963bb0e96ba16d (patch) | |
| tree | 4c5aa69da70779b64987bd06e03eb44409cddc14 | |
| parent | 04be6346691073d3d8e9a2d1d3cd75a8db9438de (diff) | |
| download | gcc-9074cde5dba88960ac90bb3fea963bb0e96ba16d.zip gcc-9074cde5dba88960ac90bb3fea963bb0e96ba16d.tar.gz gcc-9074cde5dba88960ac90bb3fea963bb0e96ba16d.tar.bz2 | |
fix LSTAT intrinsic per Krister Walfridsson <cato@df.lth.se>
From-SVN: r25339
| -rw-r--r-- | libf2c/ChangeLog | 6 | ||||
| -rw-r--r-- | libf2c/libU77/lstat_.c | 1 |
2 files changed, 6 insertions, 1 deletions
diff --git a/libf2c/ChangeLog b/libf2c/ChangeLog index 911b467..1e396a0 100644 --- a/libf2c/ChangeLog +++ b/libf2c/ChangeLog @@ -1,3 +1,9 @@ +1999-02-20 Craig Burley <craig@jcb-sc.com> + + From Krister Walfridsson <cato@df.lth.se>: + * libU77/lstat_.c (G77_lstat_0): Kill spurious setting + of element 6 to zero, as it undid the previous setting. + 1999-02-15 Craig Burley <craig@jcb-sc.com> * f2c.h: Delete my (old) email address. diff --git a/libf2c/libU77/lstat_.c b/libf2c/libU77/lstat_.c index e3efce7..801f6aa 100644 --- a/libf2c/libU77/lstat_.c +++ b/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 |