summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog4
-rw-r--r--sysif.c4
2 files changed, 6 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index 7b495a32..a4898893 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,9 @@
2015-04-11 Kaz Kylheku <kaz@kylheku.com>
+ * sysif.c: Use HAVE_FORK_STUFF to wrap fork, waitpid and dup/dup2.
+
+2015-04-11 Kaz Kylheku <kaz@kylheku.com>
+
Exposing dup and dup2.
* sysif.c (dup_wrap): New static function.
diff --git a/sysif.c b/sysif.c
index bee235dd..1126abf2 100644
--- a/sysif.c
+++ b/sysif.c
@@ -384,7 +384,7 @@ static val readlink_wrap(val path)
#endif
-#if HAVE_SYS_WAIT
+#if HAVE_FORK_STUFF
static val fork_wrap(void)
{
pid_t pid = fork();
@@ -634,7 +634,7 @@ void sysif_init(void)
reg_var(intern(lit("s-ixoth"), user_package), num_fast(S_IXOTH));
#endif
-#if HAVE_SYS_WAIT
+#if HAVE_FORK_STUFF
reg_fun(intern(lit("fork"), user_package), func_n0(fork_wrap));
reg_fun(intern(lit("wait"), user_package), func_n2o(wait_wrap, 0));
reg_fun(intern(lit("w-ifexited"), user_package), func_n1(wifexited));