Author: ctian Date: Wed Oct 22 07:18:07 2008 New Revision: 452
Log: Remove datagram-usocket from 0.4.x branch, we will support it in 0.5.x
Modified: usocket/branches/0.4.x/package.lisp usocket/branches/0.4.x/usocket.lisp
Modified: usocket/branches/0.4.x/package.lisp ============================================================================== --- usocket/branches/0.4.x/package.lisp (original) +++ usocket/branches/0.4.x/package.lisp Wed Oct 22 07:18:07 2008 @@ -38,7 +38,6 @@ #:stream-server-usocket #:socket #:socket-stream - #:datagram-usocket
#:host-byte-order ; IP(v4) utility functions #:hbo-to-dotted-quad
Modified: usocket/branches/0.4.x/usocket.lisp ============================================================================== --- usocket/branches/0.4.x/usocket.lisp (original) +++ usocket/branches/0.4.x/usocket.lisp Wed Oct 22 07:18:07 2008 @@ -82,11 +82,6 @@ (:documentation "Socket which listens for stream connections to be initiated from remote sockets."))
-(defclass datagram-usocket (usocket) - ((connected-p :initarg :connected-p :accessor connected-p)) -;; ###FIXME: documentation to be added. - (:documentation "")) - (defun usocket-p (socket) (typep socket 'usocket))
@@ -96,9 +91,6 @@ (defun stream-server-usocket-p (socket) (typep socket 'stream-server-usocket))
-(defun datagram-usocket-p (socket) - (typep socket 'datagram-usocket)) - (defun make-socket (&key socket) "Create a usocket socket type from implementation specific socket." (unless socket @@ -134,13 +126,6 @@ :socket socket :element-type element-type))
-(defun make-datagram-socket (socket &key connected-p) - (unless socket - (error 'invalid-socket-error)) - (make-instance 'datagram-usocket - :socket socket - :connected-p connected-p)) - (defgeneric socket-accept (socket &key element-type) (:documentation "Accepts a connection from `socket', returning a `stream-socket'.