src/runtime/alpha-arch.h

   1 #ifndef _ALPHA_ARCH_H
   2 #define _ALPHA_ARCH_H
   3
   4
   5 static inline void
   6 get_spinlock(lispobj *word,long 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_FLOAT_REGISTERS
  18
  19 #endif /* _ALPHA_ARCH_H */