diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-06-15 11:46:40 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-06-15 11:46:40 (GMT) |
commit | 5b8c04a70a776616bda6c47500f65e46cf926941 (patch) | |
tree | 402dece90869057a7c316cb375457061d497aad5 /generic/tcl.decls | |
parent | 213f13690302c86b48ec73d1a0f91387056f40fa (diff) | |
download | tcl-5b8c04a70a776616bda6c47500f65e46cf926941.zip tcl-5b8c04a70a776616bda6c47500f65e46cf926941.tar.gz tcl-5b8c04a70a776616bda6c47500f65e46cf926941.tar.bz2 |
Remove the Tcl_GetByteArrayFromObj/TclGetByteArrayFromObj stub entries: Those are macro's now.
Diffstat (limited to 'generic/tcl.decls')
-rw-r--r-- | generic/tcl.decls | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/generic/tcl.decls b/generic/tcl.decls index 7e625d4..26f0975 100644 --- a/generic/tcl.decls +++ b/generic/tcl.decls @@ -144,8 +144,9 @@ declare 32 { int Tcl_GetBooleanFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, int *intPtr) } +# Only available in Tcl 8.x, NULL in Tcl 9.0 declare 33 { - unsigned char *TclGetByteArrayFromObj(Tcl_Obj *objPtr, int *lengthPtr) + unsigned char *TclGetByteArrayFromObj(Tcl_Obj *objPtr, int *numBytesPtr) } declare 34 { int Tcl_GetDouble(Tcl_Interp *interp, const char *src, double *doublePtr) @@ -312,10 +313,10 @@ declare 79 { declare 80 { void Tcl_CancelIdleCall(Tcl_IdleProc *idleProc, void *clientData) } -# Removed in 9.0: -#declare 81 { -# int Tcl_Close(Tcl_Interp *interp, Tcl_Channel chan) -#} +# Only available in Tcl 8.x, NULL in Tcl 9.0 +declare 81 { + int Tcl_Close(Tcl_Interp *interp, Tcl_Channel chan) +} declare 82 { int Tcl_CommandComplete(const char *cmd) } @@ -2480,6 +2481,7 @@ declare 651 { declare 652 { Tcl_UniChar *Tcl_GetUnicodeFromObj(Tcl_Obj *objPtr, size_t *lengthPtr) } +# Only available in Tcl 8.x, NULL in Tcl 9.0 declare 653 { unsigned char *Tcl_GetByteArrayFromObj(Tcl_Obj *objPtr, size_t *numBytesPtr) } |