diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2010-04-29 15:08:03 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2010-04-29 15:08:03 (GMT) |
| commit | b84b65f49a83dd2409278f59c82fc6c79d466819 (patch) | |
| tree | c5befe02e5adfaceea2503a125a5d93d52e1f063 /generic/tclInt.h | |
| parent | 4e1cb8f323af8a2dbf67db4528b5da18cdfbe4ca (diff) | |
| download | tcl-b84b65f49a83dd2409278f59c82fc6c79d466819.zip tcl-b84b65f49a83dd2409278f59c82fc6c79d466819.tar.gz tcl-b84b65f49a83dd2409278f59c82fc6c79d466819.tar.bz2 | |
* generic/tclBinary.c (TclAppendBytesToByteArray): [Bug 2992970]: Make
* generic/tclStringObj.c (Tcl_AppendObjToObj): an append of a byte
array to another into an efficent operation. The problem was the (lack
of) a proper growth management strategy for the byte array.
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 3ca58d7..9c5ec7f 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -15,7 +15,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclInt.h,v 1.473 2010/04/28 11:50:53 nijtmans Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.474 2010/04/29 15:08:06 dkf Exp $ */ #ifndef _TCLINT @@ -2801,6 +2801,8 @@ struct Tcl_LoadHandle_ { *---------------------------------------------------------------- */ +MODULE_SCOPE void TclAppendBytesToByteArray(Tcl_Obj *objPtr, + const unsigned char *bytes, unsigned len); MODULE_SCOPE int TclNREvalCmd(Tcl_Interp *interp, Tcl_Obj *objPtr, int flags); MODULE_SCOPE void TclPushTailcallPoint(Tcl_Interp *interp); |