0.8.19.25:
[sbcl.git] / src / runtime / mips-arch.h
1 #ifndef _MIPS_ARCH_H
2 #define _MIPS_ARCH_H
3
4
5 static inline void 
6 get_spinlock(lispobj *word,int value)
7 {
8     *word=value;                /* FIXME for threads */
9 }
10
11 static inline void
12 release_spinlock(lispobj *word)
13 {
14     *word=0;
15 }
16
17 #endif /* _MIPS_ARCH_H */