X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fruntime%2Fmips-linux-os.c;h=1b9bed715cfb832a68e2fdf988dffc9f772a8e4a;hb=428b60fff4247e34ff601810f33976908f22bbc0;hp=e9d980331e50d55fcba8e56acbfa83b31f399bb6;hpb=93ff086ab8bea4dd1f34f80918935c17ac377337;p=sbcl.git diff --git a/src/runtime/mips-linux-os.c b/src/runtime/mips-linux-os.c index e9d9803..1b9bed7 100644 --- a/src/runtime/mips-linux-os.c +++ b/src/runtime/mips-linux-os.c @@ -17,6 +17,7 @@ #include #include #include +#include "sbcl.h" #include "./signal.h" #include "os.h" #include "arch.h" @@ -24,7 +25,6 @@ #include "interrupt.h" #include "interr.h" #include "lispregs.h" -#include "sbcl.h" #include #include @@ -42,6 +42,16 @@ #include size_t os_vm_page_size; +#ifdef LISP_FEATURE_SB_THREAD +#error "Define threading support functions" +#else +int arch_os_thread_init(struct thread *thread) { + return 1; /* success */ +} +int arch_os_thread_cleanup(struct thread *thread) { + return 1; /* success */ +} +#endif os_context_register_t * os_context_register_addr(os_context_t *context, int offset)