:reader socket-type
:documentation "Type of the socket: :STREAM or :DATAGRAM.")
(stream))
- (:documentation "Common base class of all sockets, not ment to be
+ (:documentation "Common base class of all sockets, not meant to be
directly instantiated.")))
(defmethod print-object ((object socket) stream)
(unless stream
(setf stream (apply #'sb-sys:make-fd-stream
(socket-file-descriptor socket)
- :name "a constant string"
+ :name "a socket"
:dual-channel-p t
args))
(setf (slot-value socket 'stream) stream)