summaryrefslogtreecommitdiffstats
path: root/generic/tclStubInit.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2017-04-20 11:44:05 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2017-04-20 11:44:05 (GMT)
commit4df14cf19400ebdaa94bfe07bc4f84cb6116ae94 (patch)
treebd7b80fa8f955687093006b277079e4aa87d34f1 /generic/tclStubInit.c
parent678ef71f6a56bae0bc42e690d2bfd7153e97c1a8 (diff)
downloadtcl-4df14cf19400ebdaa94bfe07bc4f84cb6116ae94.zip
tcl-4df14cf19400ebdaa94bfe07bc4f84cb6116ae94.tar.gz
tcl-4df14cf19400ebdaa94bfe07bc4f84cb6116ae94.tar.bz2
Remove unused functions like TclWinSetSockOpt()/Tcl_DStringTrunc() if compiled with -DTCL_NO_DEPRECATED
Diffstat (limited to 'generic/tclStubInit.c')
-rw-r--r--generic/tclStubInit.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/generic/tclStubInit.c b/generic/tclStubInit.c
index 59325b7..55ef325 100644
--- a/generic/tclStubInit.c
+++ b/generic/tclStubInit.c
@@ -143,6 +143,7 @@ void *TclWinGetTclInstance()
return hInstance;
}
+#ifndef TCL_NO_DEPRECATED
#define TclWinSetSockOpt winSetSockOpt
static int
TclWinSetSockOpt(SOCKET s, int level, int optname,
@@ -165,6 +166,7 @@ TclWinGetServByName(const char *name, const char *proto)
{
return getservbyname(name, proto);
}
+#endif /* TCL_NO_DEPRECATED */
#define TclWinNoBackslash winNoBackslash
static char *