X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=contrib%2Fsb-bsd-sockets%2Finet.lisp;h=e07f828aff4279c15e3713421eeba2c19fecc433;hb=b1f97e02b151845fd514e2fc254e69c1bd35ad48;hp=351251f09a2d85a82fb3449d7fc54717d9d421c6;hpb=4d653f81365917ace3da1e155f1bfe25fbc71507;p=sbcl.git

diff --git a/contrib/sb-bsd-sockets/inet.lisp b/contrib/sb-bsd-sockets/inet.lisp
index 351251f..e07f828 100644
--- a/contrib/sb-bsd-sockets/inet.lisp
+++ b/contrib/sb-bsd-sockets/inet.lisp
@@ -71,6 +71,8 @@ Examples:
 ;;; getprotobyname only works in the internet domain, which is why this
 ;;; is here
 (defun get-protocol-by-name (name)      ;exported
+  "Given a protocol name, return the protocol number, the protocol name, and
+a list of protocol aliases"
 
   ;; Brownie Points.  Hopefully there's one person out there using
   ;; RSPF sockets and SBCL who will appreciate the extra info