From: Nikodemus Siivola <nikodemus@random-state.net>
Date: Sat, 19 Nov 2011 19:48:09 +0000 (+0200)
Subject: sb-bsd-sockets: fix GET-HOST-BY-NAME and -ADDRESS on unthreaded builds
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=e072a8570d0fc3513ec7639b9c1c5d3b03e2695e;p=sbcl.git

sb-bsd-sockets: fix GET-HOST-BY-NAME and -ADDRESS on unthreaded builds

 (Platforms with getaddrinfo.)

 Broken by recent thread-safety fix for the same.
---

diff --git a/contrib/sb-bsd-sockets/name-service.lisp b/contrib/sb-bsd-sockets/name-service.lisp
index 056bda3..0b731db 100644
--- a/contrib/sb-bsd-sockets/name-service.lisp
+++ b/contrib/sb-bsd-sockets/name-service.lisp
@@ -61,7 +61,7 @@
 
 ;;; Resolving
 
-#+(and sb-thread (not sb-bsd-sockets-addrinfo))
+#-sb-bsd-sockets-addrinfo
 (sb-ext:defglobal **gethostby-lock** (sb-thread:make-mutex :name "gethostby lock"))
 
 (defun get-host-by-name (host-name)