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 | 5b33616e5080b53d8b1e8b8608a98d824a952ee9 (patch) | |
| tree | ff124e26492a522aa6a4f97ce86dcbb4625938bd /generic/tclIOSock.c | |
| parent | 33ded984ff02df26e0faf1d254abd2ea6acc0070 (diff) | |
| download | tcl-5b33616e5080b53d8b1e8b8608a98d824a952ee9.zip tcl-5b33616e5080b53d8b1e8b8608a98d824a952ee9.tar.gz tcl-5b33616e5080b53d8b1e8b8608a98d824a952ee9.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: |