summaryrefslogtreecommitdiffstats
path: root/generic/tclProc.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2016-05-26 16:33:37 (GMT)
committerdgp <dgp@users.sourceforge.net>2016-05-26 16:33:37 (GMT)
commitfc6928c19cf817f90924816477e7646e3ab9ccb0 (patch)
tree6ddf2d9305ace4640bb64a5d4a33de08ca4fcb73 /generic/tclProc.c
parent7934310e9e0c4d8136a7eb664890ea86eeb6b322 (diff)
downloadtcl-fc6928c19cf817f90924816477e7646e3ab9ccb0.zip
tcl-fc6928c19cf817f90924816477e7646e3ab9ccb0.tar.gz
tcl-fc6928c19cf817f90924816477e7646e3ab9ccb0.tar.bz2
Reduce to minimum set of TclResetRewriteEnsemble() calls.
Diffstat (limited to 'generic/tclProc.c')
-rw-r--r--generic/tclProc.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c
index 56d29a2..70178f4 100644
--- a/generic/tclProc.c
+++ b/generic/tclProc.c
@@ -1785,8 +1785,6 @@ TclNRInterpProcCore(
* Invoke the commands in the procedure's body.
*/
- TclResetRewriteEnsemble(interp, 1);
-
procPtr->refCount++;
codePtr = procPtr->bodyPtr->internalRep.twoPtrValue.ptr1;