From 6d36f2d6954cb79e3c88fef33fe0c3ad63deaea8 Mon Sep 17 00:00:00 2001 From: Cyrus Harmon Date: Thu, 24 Mar 2011 04:45:55 +0000 Subject: [PATCH] 1.0.46.43: fix sb-introspect on non-threaded builds * put #+sb-thread around calls inspecting sb-thread::%thread-local-references --- contrib/sb-introspect/introspect.lisp | 1 + version.lisp-expr | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/contrib/sb-introspect/introspect.lisp b/contrib/sb-introspect/introspect.lisp index 95504de..3399502 100644 --- a/contrib/sb-introspect/introspect.lisp +++ b/contrib/sb-introspect/introspect.lisp @@ -927,6 +927,7 @@ Experimental: interface subject to change." 0))) (dotimes (i (- len nuntagged)) (call (sb-kernel:%instance-ref object i)))) + #+sb-thread (when (typep object 'sb-thread:thread) (cond ((eq object sb-thread:*current-thread*) (dolist (value (sb-thread::%thread-local-references)) diff --git a/version.lisp-expr b/version.lisp-expr index 9ff5d33..ce4ca5d 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -20,4 +20,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.46.42" +"1.0.46.43" -- 1.7.10.4