# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 779915619 0
# Node ID 754325dc4ed7f51bc405e19ef4e26767024acc21
# Parent  289ed00d26a928c28dc512d6aaeffe3e80706ee6
(set_file_times): New function.

diff -r 289ed00d26a9 -r 754325dc4ed7 src/sysdep.c
--- a/src/sysdep.c	Sun Sep 18 19:00:32 1994 +0000
+++ b/src/sysdep.c	Sun Sep 18 19:13:39 1994 +0000
@@ -3023,36 +3023,34 @@
 
 #endif
 
-#ifdef MISSING_UTIMES
-
-/* HPUX (among others) sets HAVE_TIMEVAL but does not implement utimes.  */
-
-utimes ()
+int
+set_file_times (path, atime, mtime)
+     char *path;
+     EMACS_TIME atime, mtime;
 {
-}
+#ifdef HAVE_UTIMES
+  struct timeval tv[2];
+  tv[0] = atime;
+  tv[1] = mtime;
+  return utimes (path, tv);
+#else
+#ifdef HAVE_UTIME
+#ifndef HAVE_STRUCT_UTIMBUF
+  struct utimbuf {
+    long actime;
+    long modtime;
+  };
 #endif
-
-#ifdef IRIS_UTIME
-
-/* The IRIS (3.5) has timevals, but uses sys V utime, and doesn't have the
-   utimbuf structure defined anywhere but in the man page. */
-
-struct utimbuf
- {
-   long actime;
-   long modtime;
- };
-
-utimes (name, tvp)
-     char *name;
-     struct timeval tvp[];
-{
   struct utimbuf utb;
-  utb.actime  = tvp[0].tv_sec;
-  utb.modtime = tvp[1].tv_sec;
-  utime (name, &utb);
+  utb.actime = EMACS_SECS (atime);
+  utb.modtime = EMACS_SECS (mtime);
+  return utime (path, &utb);
+#else /* !HAVE_UTIMES && !HAVE_UTIME */
+  /* Should we set errno here?  If so, set it to what?  */
+  return -1;
+#endif
+#endif
 }
-#endif /* IRIS_UTIME */
 
 
 #ifdef HPUX