summaryrefslogtreecommitdiffstats
path: root/generic/tclProc.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2015-07-02 12:54:57 (GMT)
committerdgp <dgp@users.sourceforge.net>2015-07-02 12:54:57 (GMT)
commitd4d66c05ba64ebd9ae204c048eebebfd76a095c2 (patch)
tree368c39db89288c324d774cfdfe3c9494dba33bbd /generic/tclProc.c
parent2ee65349c997ec60a0e3def277a24c0f638fed78 (diff)
downloadtcl-d4d66c05ba64ebd9ae204c048eebebfd76a095c2.zip
tcl-d4d66c05ba64ebd9ae204c048eebebfd76a095c2.tar.gz
tcl-d4d66c05ba64ebd9ae204c048eebebfd76a095c2.tar.bz2
Revert refcount changes that were not cosmetic.
Changing equality testing to inequality testing does more than make code prettier or clearer. It makes it less strict, and thus more tolerant of other bugs elsewhere. Such changes deserve separate consideration at least, not breezy entry in an otherwise "code cleanup" commit.
Diffstat (limited to 'generic/tclProc.c')
-rw-r--r--generic/tclProc.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c
index a9705eb..7bf63c2 100644
--- a/generic/tclProc.c
+++ b/generic/tclProc.c
@@ -2445,7 +2445,7 @@ FreeLambdaInternalRep(
Proc *procPtr = objPtr->internalRep.twoPtrValue.ptr1;
Tcl_Obj *nsObjPtr = objPtr->internalRep.twoPtrValue.ptr2;
- if (procPtr->refCount-- <= 1) {
+ if (procPtr->refCount-- == 1) {
TclProcCleanupProc(procPtr);
}
TclDecrRefCount(nsObjPtr);