From: Francois-Rene Rideau <tunes@google.com>
Date: Tue, 1 Jan 2013 21:35:05 +0000 (-0500)
Subject: Remove a style-warning from sb-bsd-sockets.asd when #-sb-testing-contrib.
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=bcd323c39d6f5f80020ba4a5d9eb8d348c6cc499;p=sbcl.git

Remove a style-warning from sb-bsd-sockets.asd when #-sb-testing-contrib.
---

diff --git a/contrib/sb-bsd-sockets/sb-bsd-sockets.asd b/contrib/sb-bsd-sockets/sb-bsd-sockets.asd
index 7bbf5d9..e17fc63 100644
--- a/contrib/sb-bsd-sockets/sb-bsd-sockets.asd
+++ b/contrib/sb-bsd-sockets/sb-bsd-sockets.asd
@@ -54,6 +54,7 @@
 (defmethod perform ((o test-op) (c (eql (find-system :sb-bsd-sockets-tests))))
   (multiple-value-bind (soft strict pending)
       (funcall (intern "DO-TESTS" (find-package "SB-RT")))
+    (declare (ignorable pending))
     (fresh-line)
     (unless strict
       #+sb-testing-contrib