diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-12 11:28:00 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-12 11:28:00 (GMT) |
commit | ed8932a4eb542d1b5ce5714f89769865faacdefc (patch) | |
tree | 60b25491be6c6e9238acdd064605aca62dcf0b8a /generic | |
parent | 21388fa31e1099692f83009f664791387f2c387d (diff) | |
parent | b7f151f1268d4b49953da193f135d52e6e52f841 (diff) | |
download | tcl-ed8932a4eb542d1b5ce5714f89769865faacdefc.zip tcl-ed8932a4eb542d1b5ce5714f89769865faacdefc.tar.gz tcl-ed8932a4eb542d1b5ce5714f89769865faacdefc.tar.bz2 |
Merge 8.7
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclCmdAH.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCmdAH.c b/generic/tclCmdAH.c index 4df1216..ac504d0 100644 --- a/generic/tclCmdAH.c +++ b/generic/tclCmdAH.c @@ -514,7 +514,7 @@ EncodingConvertfromObjCmd( char buf[TCL_INTEGER_SPACE]; sprintf(buf, "%" TCL_Z_MODIFIER "u", result); Tcl_SetObjResult(interp, Tcl_ObjPrintf("unexpected byte sequence starting at index %" - TCL_Z_MODIFIER "u: '\\x%X'", result, UCHAR(bytesPtr[result]))); + TCL_Z_MODIFIER "u: '\\x%02X'", result, UCHAR(bytesPtr[result]))); Tcl_SetErrorCode(interp, "TCL", "ENCODING", "ILLEGALSEQUENCE", buf, NULL); Tcl_DStringFree(&ds); |