From 4f2d7949f03e1c198bc888f2d05f421d35c57e21 Mon Sep 17 00:00:00 2001 From: V3n3RiX Date: Mon, 9 Oct 2017 18:53:29 +0100 Subject: reinit the tree, so we can have metadata --- dev-lisp/sbcl/files/bsd-sockets-test.patch | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) create mode 100644 dev-lisp/sbcl/files/bsd-sockets-test.patch (limited to 'dev-lisp/sbcl/files/bsd-sockets-test.patch') 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) + -- cgit v1.2.3