diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-02-07 13:53:08 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-02-07 13:53:08 (GMT) |
commit | db32aeed9858ddb8dd0828e2fb7ef36ac46bc5f6 (patch) | |
tree | 1aac3c2b0a1094ceb09b60b0d7d728fb613ef8e9 /generic/tclBinary.c | |
parent | 593462fc80d3e1a4684644f3237115112131f83f (diff) | |
download | tcl-db32aeed9858ddb8dd0828e2fb7ef36ac46bc5f6.zip tcl-db32aeed9858ddb8dd0828e2fb7ef36ac46bc5f6.tar.gz tcl-db32aeed9858ddb8dd0828e2fb7ef36ac46bc5f6.tar.bz2 |
Tcl_InvalidateStringRep -> TclInvalidateStringRep
Diffstat (limited to 'generic/tclBinary.c')
-rw-r--r-- | generic/tclBinary.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclBinary.c b/generic/tclBinary.c index 19b95c1..dbb296b 100644 --- a/generic/tclBinary.c +++ b/generic/tclBinary.c @@ -271,7 +271,7 @@ Tcl_SetByteArrayObj( Tcl_Panic("%s called with shared object", "Tcl_SetByteArrayObj"); } TclFreeIntRep(objPtr); - Tcl_InvalidateStringRep(objPtr); + TclInvalidateStringRep(objPtr); if (length < 0) { length = 0; @@ -367,7 +367,7 @@ Tcl_SetByteArrayLength( byteArrayPtr->allocated = length; SET_BYTEARRAY(objPtr, byteArrayPtr); } - Tcl_InvalidateStringRep(objPtr); + TclInvalidateStringRep(objPtr); byteArrayPtr->used = length; return byteArrayPtr->bytes; } |