diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-11-04 11:38:09 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-11-04 11:38:09 (GMT) |
| commit | 274f081025d8d5f249ccc44025944919f4190933 (patch) | |
| tree | 722adc5a7c81396cdd5aaff3f6aa12d2086cac74 /generic | |
| parent | fba10e86152fd2c3599b2836ee42a82e7501260a (diff) | |
| parent | 76ed3d5b55523e5ad81903f37607050fb37490f9 (diff) | |
| download | tcl-274f081025d8d5f249ccc44025944919f4190933.zip tcl-274f081025d8d5f249ccc44025944919f4190933.tar.gz tcl-274f081025d8d5f249ccc44025944919f4190933.tar.bz2 | |
Make packages msgcat and tcltest work unmodified in "novem". Make more test-cases work unmodified in "novem".
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclStringObj.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index 7fd7cc1..b486106 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -2656,7 +2656,7 @@ TclStringCatObjv( /* Value has a string rep. */ if (objPtr->length) { /* - * Non-empty string rep. Not a pure bytearray, so we + * Non-empty string rep. Not a pure bytearray, so we * won't create a pure bytearray */ binary = 0; @@ -2753,7 +2753,7 @@ TclStringCatObjv( if (inPlace && !Tcl_IsShared(*objv)) { int start; - + objResultPtr = *objv++; objc--; Tcl_GetByteArrayFromObj(objResultPtr, &start); dst = Tcl_SetByteArrayLength(objResultPtr, length) + start; |