X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Falpha-arch.c;h=8cd654a88fe3564ace130a9eef588398436b74e4;hb=ae47ad0774edd8cb376772ae7e615428295f979e;hp=20f86a468ffc8e6799bcce1840b91c1aa67aad40;hpb=34dcb46f78a01d543756703d7ccdf3d999a134d0;p=sbcl.git

diff --git a/src/runtime/alpha-arch.c b/src/runtime/alpha-arch.c
index 20f86a4..8cd654a 100644
--- a/src/runtime/alpha-arch.c
+++ b/src/runtime/alpha-arch.c
@@ -16,8 +16,8 @@
 #include <stdio.h>
 #include <string.h>
 
-#include "runtime.h"
 #include "sbcl.h"
+#include "runtime.h"
 #include "globals.h"
 #include "validate.h"
 #include "os.h"
@@ -369,11 +369,6 @@ void arch_install_interrupt_handlers()
     undoably_install_low_level_interrupt_handler(SIGTRAP, sigtrap_handler);
 }
 
-void get_spinlock(lispobj *word, int value) {
-    /* FIXME: dummy definition */
-    *word = value;
-}
-
 extern lispobj call_into_lisp(lispobj fun, lispobj *args, int nargs);
 
 lispobj funcall0(lispobj function)