diff options
| author | limeboy <that.lemon+tcl@gmai.com> | 2016-11-24 12:47:21 (GMT) |
|---|---|---|
| committer | limeboy <that.lemon+tcl@gmai.com> | 2016-11-24 12:47:21 (GMT) |
| commit | 18592932556fe3ca6e78e7c4a11af2db03beb6da (patch) | |
| tree | ff124e26492a522aa6a4f97ce86dcbb4625938bd /generic/tclIOSock.c | |
| parent | 32f810fc3b6dc0ff270d295e623bacb4d766522c (diff) | |
| download | tcl-18592932556fe3ca6e78e7c4a11af2db03beb6da.zip tcl-18592932556fe3ca6e78e7c4a11af2db03beb6da.tar.gz tcl-18592932556fe3ca6e78e7c4a11af2db03beb6da.tar.bz2 | |
Implement the whole TIP 456 specification.
Also introduces the `-reuseaddr' and `-reuseport' options for the `socket'
command.
Diffstat (limited to 'generic/tclIOSock.c')
| -rw-r--r-- | generic/tclIOSock.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclIOSock.c b/generic/tclIOSock.c index 72a0b5a..b6e99ba 100644 --- a/generic/tclIOSock.c +++ b/generic/tclIOSock.c @@ -283,7 +283,7 @@ TclCreateSocketAddress( } return 1; } - + /* *---------------------------------------------------------------------- * @@ -304,9 +304,9 @@ Tcl_Channel Tcl_OpenTcpServer(Tcl_Interp *interp, int port, const char *host, Tcl_TcpAcceptProc *acceptProc, ClientData callbackData) { - return Tcl_OpenTcpServerEx(interp, port, host, 0, acceptProc, callbackData); + return Tcl_OpenTcpServerEx(interp, port, host, TCL_TCPSERVER_REUSEADDR, + acceptProc, callbackData); } - /* * Local Variables: |