0.8.3.39:

[sbcl.git] / contrib / sb-bsd-sockets / tests.lisp

diff --git a/contrib/sb-bsd-sockets/tests.lisp b/contrib/sb-bsd-sockets/tests.lisp
index eea023a..6a7931e 100644 (file)
--- a/contrib/sb-bsd-sockets/tests.lisp
+++ b/contrib/sb-bsd-sockets/tests.lisp
@@ -133,7 +133,7 @@ Tests are in the file <tt>tests.lisp</tt> and also make good examples.
 ;;; to look at /etc/syslog.conf or local equivalent to find out where
 ;;; the message ended up
 
-#-sunos
+#-(or sunos darwin)
 (deftest simple-local-client
     (let ((s (make-instance 'local-socket :type :datagram)))
       (format t "Connecting ~A... " s)
@@ -153,7 +153,7 @@ Tests are in the file <tt>tests.lisp</tt> and also make good examples.
   t)
 
 
-;;; these require that the internet (or bits of it, atleast) is available
+;;; these require that the internet (or bits of it, at least) is available
 
 #+internet-available
 (deftest get-host-by-name