X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fglobals.h;h=e8dd9debb53bcdb2214ab029d4daf92f6dd8ebdf;hb=d04b59670ab69405c4115ea3caac99fd62a4b7ab;hp=baff01ad4508785897803b50e9339eeadc2246ea;hpb=e365f2f7a9c66d307b48fee70778f4eaa84bdcc0;p=sbcl.git diff --git a/src/runtime/globals.h b/src/runtime/globals.h index baff01a..e8dd9de 100644 --- a/src/runtime/globals.h +++ b/src/runtime/globals.h @@ -16,6 +16,7 @@ #include #include +#include "sbcl.h" #include "runtime.h" extern int foreign_function_call_active; @@ -23,11 +24,11 @@ extern boolean stop_the_world; extern lispobj *current_control_stack_pointer; extern lispobj *current_control_frame_pointer; -#if !defined(__i386__) +#if !defined(LISP_FEATURE_X86) extern lispobj *current_binding_stack_pointer; #endif -#if !defined(__i386__) +#if !defined(LISP_FEATURE_X86) /* FIXME: Why doesn't the x86 need this? */ extern lispobj *dynamic_space_free_pointer; extern lispobj *current_auto_gc_trigger; @@ -35,14 +36,19 @@ extern lispobj *current_auto_gc_trigger; extern lispobj *current_dynamic_space; extern pid_t parent_pid; +extern boolean stop_the_world; extern void globals_init(void); #else /* LANGUAGE_ASSEMBLY */ #ifdef mips +#ifdef __linux__ +#define EXTERN(name,bytes) .globl name +#else #define EXTERN(name,bytes) .extern name bytes #endif +#endif /**/ #ifdef sparc #ifdef SVR4 @@ -58,9 +64,13 @@ extern void globals_init(void); #endif #endif #ifdef ppc +#ifdef LISP_FEATURE_DARWIN +#define EXTERN(name,bytes) .globl _/**/name +#else #define EXTERN(name,bytes) .globl name #endif -#ifdef __i386__ +#endif +#ifdef LISP_FEATURE_X86 #ifdef __linux__ /* I'm very dubious about this. Linux hasn't used _ on external names * since ELF became prevalent - i.e. about 1996, on x86 -dan 20010125 */