From: Stas Boukarev <stassats@gmail.com>
Date: Fri, 4 Jan 2013 12:59:01 +0000 (+0400)
Subject: sb-sprof: Define pthread-kill only on +sb-thread.
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=c8fedad1fe873eeb483868ec75d292973071f33d;p=sbcl.git

sb-sprof: Define pthread-kill only on +sb-thread.

pthread_kill alien is not present on -sb-thread, because libpthread is
not loaded, and it results in unnecessary style warnings.
---

diff --git a/contrib/sb-sprof/sb-sprof.lisp b/contrib/sb-sprof/sb-sprof.lisp
index 0d81649..9a4b474 100644
--- a/contrib/sb-sprof/sb-sprof.lisp
+++ b/contrib/sb-sprof/sb-sprof.lisp
@@ -506,8 +506,10 @@ profiling")
   ;; Ensure that only one thread at a time will be doing profiling stuff.
   (defvar *profiler-lock* (sb-thread:make-mutex :name "Statistical Profiler"))
   (defvar *distribution-lock* (sb-thread:make-mutex :name "Wallclock profiling lock"))
-
+  
+  #+sb-thread
   (declaim (inline pthread-kill))
+  #+sb-thread
   (define-alien-routine pthread-kill int (os-thread unsigned-long) (signal int))
 
   ;;; A random thread will call this in response to either a timer firing,