summaryrefslogtreecommitdiffstats
path: root/generic/tclIOSock.c
diff options
context:
space:
mode:
authormax <max@tclers.tk>2015-11-11 09:56:41 (GMT)
committermax <max@tclers.tk>2015-11-11 09:56:41 (GMT)
commitf84d09bdd759fbee98108d0a097f322255fdf0e3 (patch)
tree210fea3ef52b0575ec2daaef8f306e453a50e286 /generic/tclIOSock.c
parent47ffd7bc8e8b6cd4e4f86ec9bc969a4319fb291c (diff)
downloadtcl-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.c7
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;
}