From: Thiemo Seufer Date: Thu, 4 Oct 2007 22:54:48 +0000 (+0000) Subject: 1.0.10.19: Check also for MIPS foreign_function_call lossage X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=eab519f164be2b266ee7349fa2d2ad81f25907ae;p=sbcl.git 1.0.10.19: Check also for MIPS foreign_function_call lossage ... and fix a spelling typo. --- diff --git a/src/runtime/interrupt.c b/src/runtime/interrupt.c index c702e58..eed61e0 100644 --- a/src/runtime/interrupt.c +++ b/src/runtime/interrupt.c @@ -276,7 +276,7 @@ fake_foreign_function_call(os_context_t *context) (lispobj *)(unsigned long) (*os_context_register_addr(context, reg_ALLOC)); /* fprintf(stderr,"dynamic_space_free_pointer: %p\n", dynamic_space_free_pointer); */ -#if defined(LISP_FEATURE_ALPHA) +#if defined(LISP_FEATURE_ALPHA) || defined(LISP_FEATURE_MIPS) if ((long)dynamic_space_free_pointer & 1) { lose("dead in fake_foreign_function_call, context = %x\n", context); } @@ -442,7 +442,7 @@ interrupt_handle_pending(os_context_t *context) * that had to be executed or because pseudo atomic triggered * twice for a single interrupt. For the interested reader, * that may happen if an interrupt hits after the interrupted - * flag is cleared but before pseduo-atomic is set and a + * flag is cleared but before pseudo-atomic is set and a * pseudo atomic is interrupted in that interrupt. */ if (data->pending_handler) { diff --git a/version.lisp-expr b/version.lisp-expr index 3164953..baf840b 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -17,4 +17,4 @@ ;;; checkins which aren't released. (And occasionally for internal ;;; versions, especially for internal versions off the main CVS ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"1.0.10.18" +"1.0.10.19"