From: Cyrus Harmon Date: Thu, 24 Mar 2011 04:45:55 +0000 (+0000) Subject: 1.0.46.43: fix sb-introspect on non-threaded builds X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=6d36f2d6954cb79e3c88fef33fe0c3ad63deaea8;p=sbcl.git 1.0.46.43: fix sb-introspect on non-threaded builds * put #+sb-thread around calls inspecting sb-thread::%thread-local-references --- 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"