X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=contrib%2Fsb-bsd-sockets%2Fname-service.lisp;h=0b731dbcff65f7b70cf0206894dce194c2f71a45;hb=e072a8570d0fc3513ec7639b9c1c5d3b03e2695e;hp=056bda38026d7d26bae0f35c237c736e7ceb4819;hpb=dcf7b5cbc859426d005b534f3fa273be5da0b64c;p=sbcl.git 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)