diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-09-25 18:29:00 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-09-25 18:29:00 (GMT) |
| commit | 2b5e8028e360787eedb5c6f35ebfb1611cf9a7a2 (patch) | |
| tree | 06729b3a8e7f69a1b0d7cd470a9ca71d104f45bb | |
| parent | 708d705f35bb7a9731e961a5c0f35fa88f6ff2e3 (diff) | |
| parent | 69efa801a21b9488aff642c3bbf2d9c79be41dc7 (diff) | |
| download | tcl-2b5e8028e360787eedb5c6f35ebfb1611cf9a7a2.zip tcl-2b5e8028e360787eedb5c6f35ebfb1611cf9a7a2.tar.gz tcl-2b5e8028e360787eedb5c6f35ebfb1611cf9a7a2.tar.bz2 | |
Merge 8.7
| -rw-r--r-- | generic/tcl.decls | 2 | ||||
| -rw-r--r-- | generic/tclDecls.h | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/generic/tcl.decls b/generic/tcl.decls index 98fd2fe..be45333 100644 --- a/generic/tcl.decls +++ b/generic/tcl.decls @@ -146,7 +146,7 @@ declare 32 { } # Only available in Tcl 8.x, NULL in Tcl 9.0 declare 33 { - unsigned char *Tcl_GetByteArrayFromObj(Tcl_Obj *objPtr, int *numBytesPtr) + unsigned char *Tcl_GetByteArrayFromObj(Tcl_Obj *objPtr, Tcl_Size *numBytesPtr) } declare 34 { int Tcl_GetDouble(Tcl_Interp *interp, const char *src, double *doublePtr) diff --git a/generic/tclDecls.h b/generic/tclDecls.h index caab6cc..5b8b4d5 100644 --- a/generic/tclDecls.h +++ b/generic/tclDecls.h @@ -136,7 +136,7 @@ EXTERN int Tcl_GetBooleanFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, int *intPtr); /* 33 */ EXTERN unsigned char * Tcl_GetByteArrayFromObj(Tcl_Obj *objPtr, - int *numBytesPtr); + Tcl_Size *numBytesPtr); /* 34 */ EXTERN int Tcl_GetDouble(Tcl_Interp *interp, const char *src, double *doublePtr); @@ -1910,7 +1910,7 @@ typedef struct TclStubs { void (*tclFreeObj) (Tcl_Obj *objPtr); /* 30 */ int (*tcl_GetBoolean) (Tcl_Interp *interp, const char *src, int *intPtr); /* 31 */ int (*tcl_GetBooleanFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, int *intPtr); /* 32 */ - unsigned char * (*tcl_GetByteArrayFromObj) (Tcl_Obj *objPtr, int *numBytesPtr); /* 33 */ + unsigned char * (*tcl_GetByteArrayFromObj) (Tcl_Obj *objPtr, Tcl_Size *numBytesPtr); /* 33 */ int (*tcl_GetDouble) (Tcl_Interp *interp, const char *src, double *doublePtr); /* 34 */ int (*tcl_GetDoubleFromObj) (Tcl_Interp *interp, Tcl_Obj *objPtr, double *doublePtr); /* 35 */ void (*reserved36)(void); |