summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2016-03-14 21:52:08 -0700
committerKaz Kylheku <kaz@kylheku.com>2016-03-14 21:52:08 -0700
commit60ac365c8dbfce9f481fbfe58d4baae70df889b4 (patch)
treec267380495715f6e3c2b6c9d2fed824231407ee9
parentfeb85af5ec767988ce6e5414e5cae1ebc15b0f74 (diff)
downloadtxr-60ac365c8dbfce9f481fbfe58d4baae70df889b4.tar.gz
txr-60ac365c8dbfce9f481fbfe58d4baae70df889b4.tar.bz2
txr-60ac365c8dbfce9f481fbfe58d4baae70df889b4.zip
sock-connect return value change.
* socket.c (sock_connect): return a useful value rather than t, namely the socket. * txr.1: Documented.
-rw-r--r--socket.c2
-rw-r--r--txr.12
2 files changed, 2 insertions, 2 deletions
diff --git a/socket.c b/socket.c
index 17949a7c..d7d49b4c 100644
--- a/socket.c
+++ b/socket.c
@@ -670,7 +670,7 @@ static val sock_connect(val sock, val sockaddr)
sock_set_peer(sock, sockaddr);
- return t;
+ return sock;
}
uw_throwf(socket_error_s, lit("sock-connect: cannot connect ~s"), sock, nao);
diff --git a/txr.1 b/txr.1
index 0953ae26..a6dc6d76 100644
--- a/txr.1
+++ b/txr.1
@@ -37867,7 +37867,7 @@ object of type matching the address family of the socket.
If the operation fails, an exception of type
.code socket-error
is thrown. Otherwise, the function returns
-.codn t .
+.metn socket .
.coNP Function @ sock-bind
.synb