diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2025-08-13 21:03:13 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2025-08-13 21:03:13 (GMT) |
| commit | 2e55b5dd3a4ccf509c744ab8ed13b4547807a697 (patch) | |
| tree | c3ccff4774770fc3c4f1ff920db5a2d98c2660a9 | |
| parent | 234032f0053f594cfbddc14f56bffb6e03d45d78 (diff) | |
| download | tcl-2e55b5dd3a4ccf509c744ab8ed13b4547807a697.zip tcl-2e55b5dd3a4ccf509c744ab8ed13b4547807a697.tar.gz tcl-2e55b5dd3a4ccf509c744ab8ed13b4547807a697.tar.bz2 | |
When compiling for Tcl 8.6, make Tcl 9-specific API unavailable.
| -rw-r--r-- | generic/tclDecls.h | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/generic/tclDecls.h b/generic/tclDecls.h index 473ff9b..7ce3ac8 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -4244,6 +4244,32 @@ extern const TclStubs *tclStubsPtr; # undef Tcl_GetAliasObj # define Tcl_GetAliasObj(interp, childCmd, targetInterpPtr, targetCmdPtr, objcPtr, objv) \ tclStubsPtr->tclGetAliasObj((interp), (childCmd), (targetInterpPtr), (targetCmdPtr), (objcPtr), (objv)) +# undef Tcl_OpenTcpServerEx +# undef TclZipfs_Mount +# undef TclZipfs_Unmount +# undef TclZipfs_TclLibrary +# undef TclZipfs_MountBuffer +# undef Tcl_FreeInternalRep +# undef Tcl_InitStringRep +# undef Tcl_FetchInternalRep +# undef Tcl_StoreInternalRep +# undef Tcl_HasStringRep +# undef Tcl_LinkArray +# undef Tcl_GetIntForIndex +# undef Tcl_FSTildeExpand +# undef Tcl_ExternalToUtfDStringEx +# undef Tcl_UtfToExternalDStringEx +# undef Tcl_AsyncMarkFromSignal +# undef Tcl_GetBool +# undef Tcl_GetBoolFromObj +# undef Tcl_GetNumberFromObj +# undef Tcl_GetNumber +# undef Tcl_RemoveChannelMode +# undef Tcl_GetEncodingNulLength +# undef Tcl_GetWideUIntFromObj +# undef Tcl_DStringToObj +# undef Tcl_NewWideUIntObj +# undef Tcl_SetWideUIntObj #elif defined(TCL_8_API) # undef Tcl_GetByteArrayFromObj # undef Tcl_GetBytesFromObj |