diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-26 15:53:40 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-26 15:53:40 (GMT) |
| commit | cd51753d86cde24e24f0fa1c6edf6821ba25d0aa (patch) | |
| tree | d4ba6b39c3f40354edd6a8bf89eb6c5573528925 /generic/tclExecute.c | |
| parent | f227a5d1ff1c36d3bc5eca3f7378d5064d59d4eb (diff) | |
| download | tcl-cd51753d86cde24e24f0fa1c6edf6821ba25d0aa.zip tcl-cd51753d86cde24e24f0fa1c6edf6821ba25d0aa.tar.gz tcl-cd51753d86cde24e24f0fa1c6edf6821ba25d0aa.tar.bz2 | |
More size_t -> Tcl_Size changes, which were missed before. Also (experimental) make the wrapper macro's produce compiler warnings is Tcl_Size is not used.
Diffstat (limited to 'generic/tclExecute.c')
| -rw-r--r-- | generic/tclExecute.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index 31a8695..789c139 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -5272,7 +5272,7 @@ TEBCresume( TclNewObj(objResultPtr); } else if (TclIsPureByteArray(valuePtr)) { objResultPtr = Tcl_NewByteArrayObj( - Tcl_GetByteArrayFromObj(valuePtr, (size_t *)NULL)+index, 1); + Tcl_GetByteArrayFromObj(valuePtr, (Tcl_Size *)NULL)+index, 1); } else if (valuePtr->bytes && slength == valuePtr->length) { objResultPtr = Tcl_NewStringObj((const char *) valuePtr->bytes+index, 1); @@ -5536,7 +5536,7 @@ TEBCresume( nocase); } else if (TclIsPureByteArray(valuePtr) && TclIsPureByteArray(value2Ptr) && !nocase) { unsigned char *bytes1, *bytes2; - size_t wlen1 = 0, wlen2 = 0; + Tcl_Size wlen1 = 0, wlen2 = 0; bytes1 = Tcl_GetByteArrayFromObj(valuePtr, &wlen1); bytes2 = Tcl_GetByteArrayFromObj(value2Ptr, &wlen2); |