aboutsummaryrefslogtreecommitdiffstats
path: root/vms
diff options
context:
space:
mode:
Diffstat (limited to 'vms')
-rw-r--r--vms/ChangeLog7
-rw-r--r--vms/gawkmisc.vms5
2 files changed, 10 insertions, 2 deletions
diff --git a/vms/ChangeLog b/vms/ChangeLog
index cf7b9f9e..1347bc37 100644
--- a/vms/ChangeLog
+++ b/vms/ChangeLog
@@ -1,3 +1,8 @@
+Sun Feb 13 20:23:57 2011 Eli Zaretskii <eliz@gnu.org>
+
+ * gawkmisc.vms (files_are_same): Change arguments; call `stat' as
+ part of the body.
+
Sat Feb 12 19:29:41 2011 Pat Rankin <rankin@pactechdata.com>
* redirect.h (snprintf): Declare regardless of HAVE_SNPRINTF or
@@ -7,7 +12,7 @@ Mon Feb 7 22:43:37 2011 Arnold Robbins <arnold@skeeve.com>
* vmstest.com (negrange): Add new test.
-Sub Feb 6 18:54:20 2011 Pat Rankin <rankin@pactechdata.com>
+Sun Feb 6 18:54:20 2011 Pat Rankin <rankin@pactechdata.com>
* vmstest.com (psx96sub, whiny): Remove obsolete tests.
(aadelete1, aadelete2, aarray1, aasort, assorti, fpat1,
diff --git a/vms/gawkmisc.vms b/vms/gawkmisc.vms
index 6f8fdaef..316e613d 100644
--- a/vms/gawkmisc.vms
+++ b/vms/gawkmisc.vms
@@ -175,7 +175,10 @@ int fd;
int
files_are_same(struct stat *f1, struct stat *f2)
{
- return (strcmp(f1->st_dev, f2->st_dev) == 0
+ struct stat st;
+
+ return (stat(path, & st) == 0
+ && strcmp(f1->st_dev, f2->st_dev) == 0
&& f1->st_ino[0] == f2->st_ino[0]
&& f1->st_ino[1] == f2->st_ino[1]
&& f1->st_ino[2] == f2->st_ino[2]);