1.0.4.28: optimize GET-INTERNAL-REAL-TIME on Unix.

[sbcl.git] / src / runtime / ppc-arch.h

diff --git a/src/runtime/ppc-arch.h b/src/runtime/ppc-arch.h
index b43e78e..0c5f964 100644 (file)
--- a/src/runtime/ppc-arch.h
+++ b/src/runtime/ppc-arch.h
@@ -1,6 +1,19 @@
 #ifndef _PPC_ARCH_H
 #define _PPC_ARCH_H
 
+static inline void
+get_spinlock(lispobj *word,long value)
+{
+    *word=value;                /* FIXME for threads */
+}
+
+static inline void
+release_spinlock(lispobj *word)
+{
+    *word=0;
+}
+
+
 #define ARCH_HAS_LINK_REGISTER
 
 #endif /* _PPC_ARCH_H */