diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-08 09:12:13 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-11-08 09:12:13 (GMT) |
| commit | 994d65042ff6ea1aa6dc4b8e9da020b27817f0c6 (patch) | |
| tree | bb5c952eb3d8d7fe5d5a020a1a0cd4803c5b1d98 /generic/tclLink.c | |
| parent | fcccf8ec89035dac2b9d50f08c163cb4125feecb (diff) | |
| download | tcl-994d65042ff6ea1aa6dc4b8e9da020b27817f0c6.zip tcl-994d65042ff6ea1aa6dc4b8e9da020b27817f0c6.tar.gz tcl-994d65042ff6ea1aa6dc4b8e9da020b27817f0c6.tar.bz2 | |
Tcl_GetByteArrayFromObj -> Tcl_GetBytesFromObj everywhere in core, since it has the possibility of better error-reporting. This fixes the -DTCL_NO_DEPRECATED build failure
Diffstat (limited to 'generic/tclLink.c')
| -rw-r--r-- | generic/tclLink.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclLink.c b/generic/tclLink.c index b136709..cb56bd6 100644 --- a/generic/tclLink.c +++ b/generic/tclLink.c @@ -879,7 +879,7 @@ LinkTraceProc( return NULL; case TCL_LINK_BINARY: - value = (char *) Tcl_GetByteArrayFromObj(valueObj, &valueLength); + value = (char *) Tcl_GetBytesFromObj(NULL, valueObj, &valueLength); if (value == NULL) { return (char *) "invalid binary value"; } else if (valueLength != linkPtr->bytes) { |