X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fmips-arch.h;h=50b0776587c830f414fe123827e761460d51475b;hb=e0924e0c54b0a216560d67b9e85a077473bb5952;hp=17c18863012757ee1522511c84aa3dbd51df1a91;hpb=4ae1b794a5d6a90794468cf8017f5307f2c30dfe;p=sbcl.git

diff --git a/src/runtime/mips-arch.h b/src/runtime/mips-arch.h
index 17c1886..50b0776 100644
--- a/src/runtime/mips-arch.h
+++ b/src/runtime/mips-arch.h
@@ -1,4 +1,17 @@
 #ifndef _MIPS_ARCH_H
 #define _MIPS_ARCH_H
 
+
+static inline void 
+get_spinlock(lispobj *word,int value)
+{
+    *word=value;		/* FIXME for threads */
+}
+
+static inline void
+release_spinlock(lispobj *word)
+{
+    *word=0;
+}
+
 #endif /* _MIPS_ARCH_H */