From 83aea1f74dd3de219de053d9162f8b217b0530ca Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Thu, 16 Apr 2015 07:08:05 -0700
Subject: Adding chmod.

* configure: Detect chmod.

* sysif.c (chmod_wrap): New function.
(sysif_init): Register chmod intrinsic.

* txr.1: Documented.

* tl.vim, txr.vim: Regenerated.
---
 configure | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

(limited to 'configure')

diff --git a/configure b/configure
index f813978c..992f014b 100755
--- a/configure
+++ b/configure
@@ -1872,6 +1872,23 @@ else
   printf "no\n"
 fi
 
+printf "Checking for chmod ... "
+cat > conftest.c <<!
+#include <sys/stat.h>
+
+int main(void)
+{
+  int r = chmod("a", S_IWUSR);
+  return 0;
+}
+!
+if conftest ; then
+  printf "yes\n"
+  printf "#define HAVE_CHMOD 1\n" >> $config_h
+else
+  printf "no\n"
+fi
+
 printf "Checking for _wspawnlp ... "
 
 cat > conftest.c <<!
-- 
cgit v1.2.3