From f439e01e5455f40c24089801dd2147def79f402b Mon Sep 17 00:00:00 2001 From: Nikodemus Siivola Date: Fri, 30 May 2008 18:02:32 +0000 Subject: [PATCH] 1.0.17.12: win32 build fix * ...no signals on win32. Hopefully it now works. --- src/runtime/backtrace.c | 2 ++ version.lisp-expr | 2 +- 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/src/runtime/backtrace.c b/src/runtime/backtrace.c index 958e10f95..0ab14c0b8 100644 --- a/src/runtime/backtrace.c +++ b/src/runtime/backtrace.c @@ -533,6 +533,7 @@ describe_thread_state(void) { sigset_t mask; struct thread *thread = arch_os_get_current_thread(); +#ifndef LISP_FEATURE_WIN32 thread_sigmask(SIG_SETMASK, NULL, &mask); printf("Signal mask:\n"); printf(" SIGALRM = %d\n", sigismember(&mask, SIGALRM)); @@ -542,6 +543,7 @@ describe_thread_state(void) #ifdef SIG_STOP_FOR_GC printf(" SIG_STOP_FOR_GC = %d\n", sigismember(&mask, SIG_STOP_FOR_GC)); #endif +#endif printf("Specials:\n"); printf(" *GC-INHIBIT* = %s\n", (SymbolValue(GC_INHIBIT, thread) == T) ? "T" : "NIL"); printf(" *GC-PENDING* = %s\n", (SymbolValue(GC_PENDING, thread) == T) ? "T" : "NIL"); diff --git a/version.lisp-expr b/version.lisp-expr index 686ba0a1c..6da38de62 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.17.11" +"1.0.17.12" -- 2.11.4.GIT