diff options
| author | nijtmans@users.sourceforge.net <jan.nijtmans> | 2013-02-07 13:53:08 (GMT) |
|---|---|---|
| committer | nijtmans@users.sourceforge.net <jan.nijtmans> | 2013-02-07 13:53:08 (GMT) |
| commit | 1a96f44bc6c0ca571656af34117c4c107a3933a7 (patch) | |
| tree | 1aac3c2b0a1094ceb09b60b0d7d728fb613ef8e9 /generic/tclBinary.c | |
| parent | 6b20ae7d7c7986a2de6154759999bf38ad3a597d (diff) | |
| download | tcl-1a96f44bc6c0ca571656af34117c4c107a3933a7.zip tcl-1a96f44bc6c0ca571656af34117c4c107a3933a7.tar.gz tcl-1a96f44bc6c0ca571656af34117c4c107a3933a7.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; } |