summaryrefslogtreecommitdiffstats
path: root/generic/tclIndexObj.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2017-03-20 10:24:11 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2017-03-20 10:24:11 (GMT)
commit754b233873390beef740d1af75437ec3684b198b (patch)
tree3adf1564ad48d5a41d8d36e670d94c00e760aa51 /generic/tclIndexObj.c
parent5617ad7c180796ca3ded40478d67504694057ee6 (diff)
downloadtcl-754b233873390beef740d1af75437ec3684b198b.zip
tcl-754b233873390beef740d1af75437ec3684b198b.tar.gz
tcl-754b233873390beef740d1af75437ec3684b198b.tar.bz2
If compiled with TCL_NO_DEPRECATED, remove some more stub entries which are not used any more.
Diffstat (limited to 'generic/tclIndexObj.c')
-rw-r--r--generic/tclIndexObj.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/generic/tclIndexObj.c b/generic/tclIndexObj.c
index 6a3e4e3..9f38638 100644
--- a/generic/tclIndexObj.c
+++ b/generic/tclIndexObj.c
@@ -101,6 +101,7 @@ typedef struct {
*----------------------------------------------------------------------
*/
+#ifndef TCL_NO_DEPRECATED
#undef Tcl_GetIndexFromObj
int
Tcl_GetIndexFromObj(
@@ -137,6 +138,7 @@ Tcl_GetIndexFromObj(
return Tcl_GetIndexFromObjStruct(interp, objPtr, tablePtr, sizeof(char *),
msg, flags, indexPtr);
}
+#endif /* TCL_NO_DEPRECATED */
/*
*----------------------------------------------------------------------