From 40e5a5811c6ffce9b0974e93cdd927cbcf60c157 Mon Sep 17 00:00:00 2001
From: Joe Hunkeler <jhunkeler@gmail.com>
Date: Tue, 11 Aug 2015 16:51:37 -0400
Subject: Repatch (from linux) of OSX IRAF

---
 unix/boot/bootlib/osfdate.c | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 unix/boot/bootlib/osfdate.c

(limited to 'unix/boot/bootlib/osfdate.c')

diff --git a/unix/boot/bootlib/osfdate.c b/unix/boot/bootlib/osfdate.c
new file mode 100644
index 00000000..900b2a9d
--- /dev/null
+++ b/unix/boot/bootlib/osfdate.c
@@ -0,0 +1,20 @@
+/* Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
+ */
+
+#include <sys/types.h>
+#include <sys/stat.h>
+#include "bootlib.h"
+
+
+/* FDATE -- Get the date of last modification of a file.  [MACHDEP]
+ */
+long
+os_fdate (char *fname)
+{
+	struct	stat buf;
+
+	if (stat (vfn2osfn(fname,0), &buf) == ERR)
+	    return (0);
+	else
+	    return (buf.st_mtime);
+}
-- 
cgit