Author: ehuelsmann Date: Fri Feb 3 14:20:59 2006 New Revision: 26 Modified: usocket/trunk/package.lisp usocket/trunk/usocket.lisp Log: Remove/add interfaces to be implemented at this stage. Modified: usocket/trunk/package.lisp ============================================================================== --- usocket/trunk/package.lisp (original) +++ usocket/trunk/package.lisp Fri Feb 3 14:20:59 2006 @@ -13,6 +13,8 @@ (:export :socket-connect ; socket constructors and methods :socket-close + :with-connected-socket ; macros + :usocket ; socket object and accessors :socket-stream Modified: usocket/trunk/usocket.lisp ============================================================================== --- usocket/trunk/usocket.lisp (original) +++ usocket/trunk/usocket.lisp Fri Feb 3 14:20:59 2006 @@ -14,12 +14,13 @@ (stream :initarg :stream :accessor socket-stream) - (local-address ;; possibly need to eliminate - :initarg :local-address - :accessor local-address) - (local-port ;; possibly need to eliminate - :initarg :local-port - :accessor local-port))) +;; (local-address ;; possibly need to eliminate +;; :initarg :local-address +;; :accessor local-address) +;; (local-port ;; possibly need to eliminate +;; :initarg :local-port +;; :accessor local-port) + )) (defun make-socket (&key socket stream) (make-instance 'usocket