diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-04-26 16:02:00 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-04-26 16:02:00 (GMT) |
| commit | c0d3b18e36ba15b38e066951ddf5adaf995be0d0 (patch) | |
| tree | e3326a50e308a1c3c9f2df1ca9172f9bee1bc4ad /generic/tclExecute.c | |
| parent | 77a24f6300a1d703cbf6d3173563eec904a56b2f (diff) | |
| parent | 208f8c30a1c20162f7ec27c09afb7818153f254d (diff) | |
| download | tcl-c0d3b18e36ba15b38e066951ddf5adaf995be0d0.zip tcl-c0d3b18e36ba15b38e066951ddf5adaf995be0d0.tar.gz tcl-c0d3b18e36ba15b38e066951ddf5adaf995be0d0.tar.bz2 | |
Merge 9.0
Diffstat (limited to 'generic/tclExecute.c')
| -rw-r--r-- | generic/tclExecute.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index f5923a1..9df881e 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -5113,7 +5113,7 @@ TEBCresume( TclNewObj(objResultPtr); } else if (TclIsPureByteArray(valuePtr)) { objResultPtr = Tcl_NewByteArrayObj( - (Tcl_GetBytesFromObj)(NULL, valuePtr, NULL)+index, 1); + Tcl_GetBytesFromObj(NULL, valuePtr, (size_t *)NULL)+index, 1); } else if (valuePtr->bytes && slength == valuePtr->length) { objResultPtr = Tcl_NewStringObj((const char *) valuePtr->bytes+index, 1); |