summaryrefslogtreecommitdiff
path: root/dev-lisp/sbcl/files/bsd-sockets-test.patch
diff options
context:
space:
mode:
Diffstat (limited to 'dev-lisp/sbcl/files/bsd-sockets-test.patch')
-rw-r--r--dev-lisp/sbcl/files/bsd-sockets-test.patch22
1 files changed, 22 insertions, 0 deletions
diff --git a/dev-lisp/sbcl/files/bsd-sockets-test.patch b/dev-lisp/sbcl/files/bsd-sockets-test.patch
new file mode 100644
index 000000000000..d08fd8610b89
--- /dev/null
+++ b/dev-lisp/sbcl/files/bsd-sockets-test.patch
@@ -0,0 +1,22 @@
+diff -r -U1 sbcl-1.1.14.orig/contrib/sb-bsd-sockets/tests.lisp sbcl-1.1.14/contrib/sb-bsd-sockets/tests.lisp
+--- sbcl-1.1.14.orig/contrib/sb-bsd-sockets/tests.lisp 2013-11-30 21:28:17.000000000 +0700
++++ sbcl-1.1.14/contrib/sb-bsd-sockets/tests.lisp 2014-01-11 20:48:22.762700792 +0700
+@@ -31,10 +31,10 @@
+ ;;; for unknown protocols...
+-#-(and freebsd sb-thread)
+-(deftest get-protocol-by-name/error
+- (handler-case (get-protocol-by-name "nonexistent-protocol")
+- (unknown-protocol ()
+- t)
+- (:no-error ()
+- nil))
+- t)
++;#-(and freebsd sb-thread)
++;(deftest get-protocol-by-name/error
++; (handler-case (get-protocol-by-name "nonexistent-protocol")
++; (unknown-protocol ()
++; t)
++; (:no-error ()
++; nil))
++; t)
+