X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fthread.h;h=9d72005963b04650faed84f56eabf39e594381b2;hb=2c06e3056fe6aa820817a927fa0e840eb7b8edb7;hp=8134ff01f8de73211fd2859fbf54f3862b48bfb1;hpb=e2b2b8f2156ede16d70a0bdd0cfad29ea31b8ccc;p=sbcl.git diff --git a/src/runtime/thread.h b/src/runtime/thread.h index 8134ff0..9d72005 100644 --- a/src/runtime/thread.h +++ b/src/runtime/thread.h @@ -34,6 +34,15 @@ union per_thread_data { extern struct thread * volatile all_threads; extern int dynamic_values_bytes; +#if defined(LISP_FEATURE_DARWIN) +#define CONTROL_STACK_ALIGNMENT_BYTES 8192 /* darwin wants page-aligned stacks */ +#define THREAD_ALIGNMENT_BYTES CONTROL_STACK_ALIGNMENT_BYTES +#else +#define THREAD_ALIGNMENT_BYTES BACKEND_PAGE_SIZE +#define CONTROL_STACK_ALIGNMENT_BYTES 16 +#endif + + #ifdef LISP_FEATURE_SB_THREAD #define for_each_thread(th) for(th=all_threads;th;th=th->next) #else