summaryrefslogtreecommitdiffstats
path: root/generic/tclBinary.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-02-07 13:53:08 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-02-07 13:53:08 (GMT)
commitae8888b89406b7378499b966af90ca831f269eb8 (patch)
tree1aac3c2b0a1094ceb09b60b0d7d728fb613ef8e9 /generic/tclBinary.c
parent765de9e2ef4cdb43d97e28f02b2e0f6a1b981262 (diff)
downloadtcl-ae8888b89406b7378499b966af90ca831f269eb8.zip
tcl-ae8888b89406b7378499b966af90ca831f269eb8.tar.gz
tcl-ae8888b89406b7378499b966af90ca831f269eb8.tar.bz2
Tcl_InvalidateStringRep -> TclInvalidateStringRep
Diffstat (limited to 'generic/tclBinary.c')
-rw-r--r--generic/tclBinary.c4
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;
}