X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Frun-program.c;h=08feaa19322622b3ef35c9220ab0a70567a5b351;hb=0f234877047c56ca945fe54e9e77a9cc2c8141cb;hp=61ad7617bd871f974c4a846654d21d79e85d19d4;hpb=64533db68167ac8cbe3ea9fa0676fd799c3b9110;p=sbcl.git

diff --git a/src/runtime/run-program.c b/src/runtime/run-program.c
index 61ad761..08feaa1 100644
--- a/src/runtime/run-program.c
+++ b/src/runtime/run-program.c
@@ -67,6 +67,8 @@ int spawn(char *program, char *argv[], char *envp[], char *pty_name,
     /* Put us in our own process group. */
 #if defined(hpux)
     setsid();
+#elif defined(LISP_FEATURE_DARWIN)
+    setpgid(0, getpid());
 #elif defined(SVR4) || defined(__linux__) || defined(__osf__)
     setpgrp();
 #else