summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2016-11-15 13:31:02 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2016-11-15 13:31:02 (GMT)
commit47302d8e0457f8f002223bf6c5536f9226fbd59c (patch)
tree647cf4f46fb406349970da5933d337dfe1dd23ad
parentdef4c8ce29b135940f12eb623a5bebb5bafd67fa (diff)
downloadtcl-bug_itcl_1b2865.zip
tcl-bug_itcl_1b2865.tar.gz
tcl-bug_itcl_1b2865.tar.bz2
Slightly more efficient version as this is Hot Path code.bug_itcl_1b2865
-rw-r--r--generic/tclOOCall.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclOOCall.c b/generic/tclOOCall.c
index 814fb0b..8003345 100644
--- a/generic/tclOOCall.c
+++ b/generic/tclOOCall.c
@@ -179,7 +179,7 @@ StashCallChain(
CallChain *callPtr)
{
callPtr->refCount++;
- Tcl_GetString(objPtr);
+ TclGetString(objPtr);
TclFreeIntRep(objPtr);
objPtr->typePtr = &methodNameType;
objPtr->internalRep.twoPtrValue.ptr1 = callPtr;