X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fglobals.h;h=7a6b59f6ca2d0fb7be31a40f5519eb916ed9ad17;hb=d4b738d6c0b354de817fa490b50814e40872b3d0;hp=c9e8c8568b445ae6987e280eed894c2d1a288094;hpb=1e4629723d19f96d752235ffde34fe58431431ae;p=sbcl.git diff --git a/src/runtime/globals.h b/src/runtime/globals.h index c9e8c85..7a6b59f 100644 --- a/src/runtime/globals.h +++ b/src/runtime/globals.h @@ -14,9 +14,12 @@ #ifndef LANGUAGE_ASSEMBLY +#include +#include #include "runtime.h" extern int foreign_function_call_active; +extern boolean stop_the_world; extern lispobj *current_control_stack_pointer; extern lispobj *current_control_frame_pointer; @@ -31,6 +34,8 @@ extern lispobj *current_auto_gc_trigger; #endif extern lispobj *current_dynamic_space; +extern pid_t parent_pid; +extern boolean stop_the_world; extern void globals_init(void); @@ -54,8 +59,12 @@ extern void globals_init(void); #endif #endif #ifdef ppc +#ifdef DARWIN +#define EXTERN(name,bytes) .globl _/**/name +#else #define EXTERN(name,bytes) .globl name #endif +#endif #ifdef __i386__ #ifdef __linux__ /* I'm very dubious about this. Linux hasn't used _ on external names