From 6c339c2b71bf4ae48eb7a8135b5aa16c7187f1e9 Mon Sep 17 00:00:00 2001 From: Gabor Melis Date: Wed, 8 Apr 2009 16:04:02 +0000 Subject: [PATCH] 1.0.27.5: fix compilation on windows Thanks to Bart Botta. --- src/runtime/interrupt.c | 6 ++++++ version.lisp-expr | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/src/runtime/interrupt.c b/src/runtime/interrupt.c index 4a3c7fc..e469d8f 100644 --- a/src/runtime/interrupt.c +++ b/src/runtime/interrupt.c @@ -250,11 +250,13 @@ sigset_t gc_sigset; #endif +#if !defined(LISP_FEATURE_WIN32) boolean deferrables_blocked_p(sigset_t *sigset) { return all_signals_blocked_p(sigset, &deferrable_sigset, "deferrable"); } +#endif void check_deferrables_unblocked_or_lose(sigset_t *sigset) @@ -274,11 +276,13 @@ check_deferrables_blocked_or_lose(sigset_t *sigset) #endif } +#if !defined(LISP_FEATURE_WIN32) boolean blockables_blocked_p(sigset_t *sigset) { return all_signals_blocked_p(sigset, &blockable_sigset, "blockable"); } +#endif void check_blockables_unblocked_or_lose(sigset_t *sigset) @@ -298,11 +302,13 @@ check_blockables_blocked_or_lose(sigset_t *sigset) #endif } +#if !defined(LISP_FEATURE_WIN32) boolean gc_signals_blocked_p(sigset_t *sigset) { return all_signals_blocked_p(sigset, &gc_sigset, "gc"); } +#endif void check_gc_signals_unblocked_or_lose(sigset_t *sigset) diff --git a/version.lisp-expr b/version.lisp-expr index 09502f2..3466198 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.27.4" +"1.0.27.5" -- 1.7.10.4