From 38d32cd5006286ad87cf92b65df2633ee7f2db6b Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Sat, 11 Apr 2015 07:14:41 -0700 Subject: * sysif.c: Use HAVE_FORK_STUFF to wrap fork, waitpid and dup/dup2. --- ChangeLog | 4 ++++ sysif.c | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index 7b495a32..a4898893 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2015-04-11 Kaz Kylheku + + * sysif.c: Use HAVE_FORK_STUFF to wrap fork, waitpid and dup/dup2. + 2015-04-11 Kaz Kylheku Exposing dup and dup2. 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)); -- cgit v1.2.3