summaryrefslogtreecommitdiffstats
path: root/generic/tclObj.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-04-13 13:13:13 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-04-13 13:13:13 (GMT)
commit12b3b1ee00af9aad9c73355a394757942e845844 (patch)
tree9e7b3633feb8db096a04e13d827b85985573ba64 /generic/tclObj.c
parente40a0e13a8de63c8ecf2c5c6853830f691e5fc07 (diff)
parent4d067d1cdfab28efd3e6e91b840cf62a776df709 (diff)
downloadtcl-12b3b1ee00af9aad9c73355a394757942e845844.zip
tcl-12b3b1ee00af9aad9c73355a394757942e845844.tar.gz
tcl-12b3b1ee00af9aad9c73355a394757942e845844.tar.bz2
Allow Tcl build without the Tcl 8 compat API. Derived from "disabletcl8api" branch (thanks, Rolf), but using the already existing -DTCL_NO_DEPRECATED (in Makefile) or CHECKS=nodep (makefile.vc)
Since there are Github Action builds with -DTCL_NO_DEPRECATED/CHECKS=nodep, we cannot use the Tcl 8 compat API in the core code itself any more.
Diffstat (limited to 'generic/tclObj.c')
-rw-r--r--generic/tclObj.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclObj.c b/generic/tclObj.c
index de48434..e27f36e 100644
--- a/generic/tclObj.c
+++ b/generic/tclObj.c
@@ -1665,7 +1665,7 @@ Tcl_GetString(
*----------------------------------------------------------------------
*/
-#undef TclGetStringFromObj
+#if !defined(TCL_NO_DEPRECATED)
char *
TclGetStringFromObj(
Tcl_Obj *objPtr, /* Object whose string rep byte pointer should
@@ -1708,6 +1708,7 @@ TclGetStringFromObj(
}
return objPtr->bytes;
}
+#endif /* !defined(TCL_NO_DEPRECATED) */
#undef Tcl_GetStringFromObj
char *