diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-12-11 20:02:40 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-12-11 20:02:40 (GMT) |
commit | f8c365412ab16261db162c4018b225b1dd096aa8 (patch) | |
tree | 02e91e1577770fb368b1db809c5f12096e38d614 /generic/tclIORTrans.c | |
parent | 9d94ed0d5461f1677bc5483a618768872457b7dc (diff) | |
parent | 00268d4ae68741fdbf73a54412cd38648f9d7302 (diff) | |
download | tcl-f8c365412ab16261db162c4018b225b1dd096aa8.zip tcl-f8c365412ab16261db162c4018b225b1dd096aa8.tar.gz tcl-f8c365412ab16261db162c4018b225b1dd096aa8.tar.bz2 |
Merge 8.7
In test-cases, don't load Tcltest package if it isn't actually used.
Another round of size_t related improvements. Nothing functional. Also improve some comments.
Diffstat (limited to 'generic/tclIORTrans.c')
-rw-r--r-- | generic/tclIORTrans.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclIORTrans.c b/generic/tclIORTrans.c index 178db52..678fcc1 100644 --- a/generic/tclIORTrans.c +++ b/generic/tclIORTrans.c @@ -2805,12 +2805,12 @@ ForwardSetObjError( ForwardParam *paramPtr, Tcl_Obj *obj) { - int len; + size_t len; const char *msgStr = TclGetStringFromObj(obj, &len); len++; ForwardSetDynamicError(paramPtr, Tcl_Alloc(len)); - memcpy(paramPtr->base.msgStr, msgStr, (unsigned) len); + memcpy(paramPtr->base.msgStr, msgStr, len); } #endif /* TCL_THREADS */ |