X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fdarwin-os.h;h=9d0e000b2c47f0236bb450fb3ead58bbe69979a4;hb=dd54f9e004a0a83d1328e94648f48dcc27e0be5b;hp=b78f470a0852789a5613fbae9e5666c450d155cb;hpb=619189958917e80786d5bb2efa4dc38d908d2553;p=sbcl.git

diff --git a/src/runtime/darwin-os.h b/src/runtime/darwin-os.h
index b78f470..9d0e000 100644
--- a/src/runtime/darwin-os.h
+++ b/src/runtime/darwin-os.h
@@ -27,7 +27,6 @@ typedef struct ucontext os_context_t;
 
 
 #else
-#include <ucontext.h>
 typedef ucontext_t os_context_t;
 #endif
 
@@ -35,4 +34,16 @@ typedef ucontext_t os_context_t;
 
 #define SIG_STOP_FOR_GC (SIGUSR2)
 
+#ifdef LISP_FEATURE_MACH_EXCEPTION_HANDLER
+extern mach_port_t current_mach_task;
+#endif
+
+void darwin_init(void);
+
+#ifdef LISP_FEATURE_SB_THREAD
+#define CANNOT_USE_POSIX_SEM_T
+#include <mach/semaphore.h>
+typedef semaphore_t os_sem_t;
+#endif
+
 #endif /* _DARWIN_OS_H */