--- sbcl-1.0.49.orig/src/runtime/mips-arch.h 2011-06-25 16:13:44.103101571 +0200 +++ sbcl-1.0.49/src/runtime/mips-arch.h 2011-06-25 16:14:31.279501569 +0200 @@ -1,6 +1,8 @@ #ifndef _MIPS_ARCH_H #define _MIPS_ARCH_H +/* For lose. */ +#include "interr.h" static inline void get_spinlock(volatile lispobj *word, long value) @@ -31,7 +33,7 @@ [__new] "r" (value) : "memory"); - if (!cmp) + if (!__cmp) lose("recursive get_spinlock: 0x%x,%d\n", word, value); #else /* LISP_FEATURE_SB_THREAD */ *word=value;