(:shadow close listen)
#+cmu (:shadowing-import-from "CL" with-array-data)
#+sbcl (:shadowing-import-from "SB-KERNEL" with-array-data)
-
#+cmu (:use "COMMON-LISP" "ALIEN" "SYSTEM" "EXT" "C-CALL")
#+sbcl (:use "COMMON-LISP" "SB-ALIEN" #+nil "SB-SYSTEM" "SB-EXT" "SB-C-CALL"))
socket-bind socket-accept socket-connect
socket-send socket-receive socket-recv
socket-name socket-peername socket-listen
- socket-close socket-file-descriptor socket-make-stream
- get-protocol-by-name
+ socket-close socket-file-descriptor
+ socket-family socket-protocol socket-open-p
+ socket-type socket-make-stream get-protocol-by-name
get-host-by-name get-host-by-address
host-ent
host-ent-addresses host-ent-address
- host-ent aliases host-ent-name
+ host-ent-aliases host-ent-name
name-service-error
;; not sure if these are really good names or not
netdb-internal-error
host-not-found-error
try-again-error
no-recovery-error
-
- ;; all socket options are also exported, by code in
- ;; sockopt.lisp
-
- bad-file-descriptor-error
- address-in-use-error
- interrupted-error
- invalid-argument-error
- out-of-memory-error
- operation-not-supported-error
- operation-not-permitted-error
- protocol-not-supported-error
- socket-type-not-supported-error
- network-unreachable-error
-
+
+ ;; all socket options are also exported, by code in
+ ;; sockopt.lisp
+
+ socket-error
+
+ ;; other errno-based socket errors are exported by code in
+ ;; sockets.lisp
+
make-inet-address
non-blocking-mode
)
(:use "COMMON-LISP" "SB-BSD-SOCKETS-INTERNAL")
+ (:import-from "SB-INT" "UNSUPPORTED-OPERATOR" "FEATUREP")
(:documentation
"
<li> Methods applicable to a particular subclass
<ol>
<li> <a href="#internet">INET-SOCKET</a> - Internet Protocol (TCP, UDP, raw) sockets
-<li> Methods on <a href="#LOCAL-SOCKET">LOCAL-SOCKET</a> - Local-domain sockets
+<li> Methods on <a href="#LOCAL-SOCKET">LOCAL-SOCKET</a> - Local-domain sockets
</ol>
<li> <a href="#name-service">Name resolution</a> (DNS, /etc/hosts, &c)
</ol>
|#
+
+(in-package :sb-bsd-sockets)
+
+(defmethod asdf:hyperdocumentation
+ ((package (eql #.*package*)) symbol kind)
+ (declare (ignore kind))
+ (format nil "file://~A#~A"
+ #.(namestring
+ (merge-pathnames "index.html"
+ (or *load-pathname* *compile-file-pathname*)))
+ symbol))