diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-13 08:58:49 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-13 08:58:49 (GMT) |
commit | 1fa28c73f4fb30900111ae304f4cec8165d20e22 (patch) | |
tree | a14fd53ffaa35ecdbd1706eaef3664fe0a086881 /generic/tclDecls.h | |
parent | 1d0a01ece902a32167f162e2f98bd5071095f7df (diff) | |
parent | d911ff5d3251cab6389f567c5db7d4def10f2c0b (diff) | |
download | tcl-1fa28c73f4fb30900111ae304f4cec8165d20e22.zip tcl-1fa28c73f4fb30900111ae304f4cec8165d20e22.tar.gz tcl-1fa28c73f4fb30900111ae304f4cec8165d20e22.tar.bz2 |
Rebase to 9.0. Document the TCL_8_API flag.
Diffstat (limited to 'generic/tclDecls.h')
-rw-r--r-- | generic/tclDecls.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclDecls.h b/generic/tclDecls.h index a0953e7..cc3da7c 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -4214,7 +4214,7 @@ extern const TclStubs *tclStubsPtr; # undef Tcl_ParseArgsObjv # define Tcl_ParseArgsObjv(interp, argTable, objcPtr, objv, remObjv) \ tclStubsPtr->tclParseArgsObjv((interp), (argTable), (objcPtr), (objv), (remObjv)) -#elif !defined(TCL_NO_DEPRECATED) +#elif defined(TCL_8_API) # undef Tcl_GetByteArrayFromObj # undef Tcl_GetBytesFromObj # undef Tcl_GetStringFromObj @@ -4295,10 +4295,10 @@ extern const TclStubs *tclStubsPtr; tclStubsPtr->tclParseArgsObjv((interp), (argTable), (objcPtr), (objv), (remObjv)) : \ tclStubsPtr->tcl_ParseArgsObjv((interp), (argTable), (objcPtr), (objv), (remObjv))) # endif /* defined(USE_TCL_STUBS) */ -#else /* defined(TCL_NO_DEPRECATED) */ +#else /* !defined(TCL_8_API) */ # undef Tcl_GetByteArrayFromObj # define Tcl_GetByteArrayFromObj(objPtr, sizePtr) \ tclStubsPtr->tcl_GetBytesFromObj(NULL, (objPtr), (sizePtr)) -#endif /* !defined(TCL_NO_DEPRECATED) */ +#endif /* defined(TCL_8_API) */ #endif /* _TCLDECLS */ |