#ifndef _ALPHA_ARCH_H
#define _ALPHA_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_FLOAT_REGISTERS
#endif /* _ALPHA_ARCH_H */