diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-13 13:13:13 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-13 13:13:13 (GMT) |
commit | 12b3b1ee00af9aad9c73355a394757942e845844 (patch) | |
tree | 9e7b3633feb8db096a04e13d827b85985573ba64 /generic/tclObj.c | |
parent | e40a0e13a8de63c8ecf2c5c6853830f691e5fc07 (diff) | |
parent | 4d067d1cdfab28efd3e6e91b840cf62a776df709 (diff) | |
download | tcl-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.c | 3 |
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 * |