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 | ae8888b89406b7378499b966af90ca831f269eb8 (patch) | |
tree | 1aac3c2b0a1094ceb09b60b0d7d728fb613ef8e9 /generic/tclBinary.c | |
parent | 765de9e2ef4cdb43d97e28f02b2e0f6a1b981262 (diff) | |
download | tcl-ae8888b89406b7378499b966af90ca831f269eb8.zip tcl-ae8888b89406b7378499b966af90ca831f269eb8.tar.gz tcl-ae8888b89406b7378499b966af90ca831f269eb8.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; } |