diff options
author | max <max@tclers.tk> | 2015-11-11 09:56:41 (GMT) |
---|---|---|
committer | max <max@tclers.tk> | 2015-11-11 09:56:41 (GMT) |
commit | f84d09bdd759fbee98108d0a097f322255fdf0e3 (patch) | |
tree | 210fea3ef52b0575ec2daaef8f306e453a50e286 /generic/tclIOSock.c | |
parent | 47ffd7bc8e8b6cd4e4f86ec9bc969a4319fb291c (diff) | |
download | tcl-f84d09bdd759fbee98108d0a097f322255fdf0e3.zip tcl-f84d09bdd759fbee98108d0a097f322255fdf0e3.tar.gz tcl-f84d09bdd759fbee98108d0a097f322255fdf0e3.tar.bz2 |
Remove unused calculation of the result set size from TclCreateSocketAddress()
Diffstat (limited to 'generic/tclIOSock.c')
-rw-r--r-- | generic/tclIOSock.c | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/generic/tclIOSock.c b/generic/tclIOSock.c index d578d19..c5b7d28 100644 --- a/generic/tclIOSock.c +++ b/generic/tclIOSock.c @@ -171,7 +171,7 @@ TclCreateSocketAddress( char *native = NULL, portbuf[TCL_INTEGER_SPACE], *portstring; const char *family = NULL; Tcl_DString ds; - int result, i; + int result; if (host != NULL) { native = Tcl_UtfToExternalDString(NULL, host, -1, &ds); @@ -279,11 +279,6 @@ TclCreateSocketAddress( *addrlist = v4head; } } - i = 0; - for (p = *addrlist; p != NULL; p = p->ai_next) { - i++; - } - return 1; } |