0.8.0.68:

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

diff --git a/contrib/sb-bsd-sockets/local.lisp b/contrib/sb-bsd-sockets/local.lisp
index 363f051..2350e06 100644 (file)
--- a/contrib/sb-bsd-sockets/local.lisp
+++ b/contrib/sb-bsd-sockets/local.lisp
@@ -32,7 +32,7 @@ a network.
   sockint::size-of-sockaddr-un)
 
 (defmethod bits-of-sockaddr ((socket local-socket) sockaddr)
-  "Returns filename of SOCKADDR"
+  "Return the file name of the local socket address SOCKADDR."
   (let ((name (sb-c-call::%naturalize-c-string
               (sb-sys:sap+ (sockint::array-data-address sockaddr)
                            sockint::offset-of-sockaddr-un-path))))