X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fglobals.h;h=c9e8c8568b445ae6987e280eed894c2d1a288094;hb=3bb2fb5b9ecdeebecaded4ac6e5af0f653be8867;hp=84f032456136162d82bdbc0daa2f5e75eb83b375;hpb=e88f9c7fd830938e1261cc424437905fb50179ae;p=sbcl.git

diff --git a/src/runtime/globals.h b/src/runtime/globals.h
index 84f0324..c9e8c85 100644
--- a/src/runtime/globals.h
+++ b/src/runtime/globals.h
@@ -20,11 +20,11 @@ extern int foreign_function_call_active;
 
 extern lispobj *current_control_stack_pointer;
 extern lispobj *current_control_frame_pointer;
-#if !defined(ibmrt) && !defined(__i386__)
+#if !defined(__i386__)
 extern lispobj *current_binding_stack_pointer;
 #endif
 
-#if !defined(ibmrt) && !defined(__i386__)
+#if !defined(__i386__)
 /* FIXME: Why doesn't the x86 need this? */
 extern lispobj *dynamic_space_free_pointer;
 extern lispobj *current_auto_gc_trigger;
@@ -34,7 +34,7 @@ extern lispobj *current_dynamic_space;
 
 extern void globals_init(void);
 
-#else  LANGUAGE_ASSEMBLY
+#else /* LANGUAGE_ASSEMBLY */
 
 #ifdef mips
 #define EXTERN(name,bytes) .extern name bytes
@@ -48,15 +48,14 @@ extern void globals_init(void);
 #endif
 #endif
 /**/
-#ifdef ibmrt
-#define EXTERN(name,bytes) .globl _/**/name
-#endif
-/**/
 #ifdef alpha
 #ifdef __linux__
 #define EXTERN(name,bytes) .globl name 
 #endif
 #endif
+#ifdef ppc
+#define EXTERN(name,bytes) .globl name 
+#endif
 #ifdef __i386__
 #ifdef __linux__
 /* I'm very dubious about this.  Linux hasn't used _ on external names
@@ -67,6 +66,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)
@@ -79,6 +83,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_ */