0.8.16.6:
[sbcl.git] / src / runtime / hppa-arch.h
1 #ifndef _HPPA_ARCH_H
2 #define _HPPA_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 #define ARCH_HAS_NPC_REGISTER
18
19 #endif /* _HPPA_ARCH_H */