From 154ec4777c5bf2a78abf8e61d69a62a51c5d5b8a Mon Sep 17 00:00:00 2001 From: Stelian Ionescu Date: Sat, 30 Jun 2007 03:34:14 +0200 Subject: [PATCH] Added DEFGENERICs for {LOCAL,REMOTE}-{ADDRESS,PORT}. Signed-off-by: Stelian Ionescu --- sockets/base-sockets.lisp | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/sockets/base-sockets.lisp b/sockets/base-sockets.lisp index 895c642..cad85c2 100644 --- a/sockets/base-sockets.lisp +++ b/sockets/base-sockets.lisp @@ -41,12 +41,16 @@ (defgeneric local-name (socket)) -(defgeneric socket-address (socket)) +(defgeneric local-address (socket)) -(defgeneric socket-port (socket)) +(defgeneric local-port (socket)) (defgeneric remote-name (socket)) +(defgeneric remote-address (socket)) + +(defgeneric remote-port (socket)) + (defgeneric get-socket-option (socket option-name)) (defgeneric set-socket-option (socket option-name &key &allow-other-keys)) -- 2.11.4.GIT