X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-bsd-sockets%2Fsockopt.lisp;h=22a181667053d41113b70cfd9d8b5b876bbd1e04;hb=6fbe5560039a2c64c651ee0a9c69e33bce8c94a6;hp=e689a4807b50a8ade1d11cf2f1616fb1bddda6a7;hpb=4898ef32c639b1c7f4ee13a5ba566ce6debd03e6;p=sbcl.git

diff --git a/contrib/sb-bsd-sockets/sockopt.lisp b/contrib/sb-bsd-sockets/sockopt.lisp
index e689a48..22a1816 100644
--- a/contrib/sb-bsd-sockets/sockopt.lisp
+++ b/contrib/sb-bsd-sockets/sockopt.lisp
@@ -43,7 +43,7 @@ Code for options that not every system has should be conditionalised:
          (if (numberp (eval level))
              level
              `(get-protocol-by-name ,(string-downcase (symbol-name level)))))
-        (supportedp (or (null features) (featurep features))))
+        (supportedp (or (null features) (sb-int:featurep features))))
     `(progn
       (export ',lisp-name)
       (defun ,lisp-name (socket)