X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fglobals.h;h=7a6b59f6ca2d0fb7be31a40f5519eb916ed9ad17;hb=1b650be8b800cf96e2c268ae317fb26d0bf36827;hp=495e8552083fd8593a1d399a9e7bde387e0bdc22;hpb=cab2c71bb1bb8a575d9eebdae335e731daa64183;p=sbcl.git

diff --git a/src/runtime/globals.h b/src/runtime/globals.h
index 495e855..7a6b59f 100644
--- a/src/runtime/globals.h
+++ b/src/runtime/globals.h
@@ -14,9 +14,12 @@
 
 #ifndef LANGUAGE_ASSEMBLY
 
+#include <sys/types.h>
+#include <unistd.h>
 #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,10 +34,12 @@ 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);
 
-#else  LANGUAGE_ASSEMBLY
+#else /* LANGUAGE_ASSEMBLY */
 
 #ifdef mips
 #define EXTERN(name,bytes) .extern name bytes
@@ -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
@@ -66,6 +75,11 @@ extern void globals_init(void);
 #endif
 #endif
 
+/* FIXME : these sizes are, incidentally, bogus on Alpha.  But the
+ * EXTERN macro doesn't use its second arg anyway, so no immediate harm
+ * done   -dan 2002.05.07
+ */
+
 EXTERN(foreign_function_call_active, 4)
 
 EXTERN(current_control_stack_pointer, 4)
@@ -78,6 +92,6 @@ EXTERN(current_dynamic_space, 4)
 EXTERN(current_flags_register, 4)
 #endif
 
-#endif LANGUAGE_ASSEMBLY
+#endif /* LANGUAGE_ASSEMBLY */
 
-#endif _INCLUDED_GLOBALS_H_
+#endif /* _INCLUDED_GLOBALS_H_ */