summaryrefslogtreecommitdiffstats
path: root/generic/tcl.h
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2012-12-13 16:17:13 (GMT)
committerdgp <dgp@users.sourceforge.net>2012-12-13 16:17:13 (GMT)
commita555b6e7aaf7b6d30b29e65984f3a96f0435e184 (patch)
treea47298e64f6e89dcc1091bd45f51064214aab3f4 /generic/tcl.h
parentb5d93c0982c6fd38917409461cc86a0dad5a467b (diff)
parentf0de1fd27c3a2f0e88e89b4ce85ec9a0c72508f6 (diff)
downloadtcl-a555b6e7aaf7b6d30b29e65984f3a96f0435e184.zip
tcl-a555b6e7aaf7b6d30b29e65984f3a96f0435e184.tar.gz
tcl-a555b6e7aaf7b6d30b29e65984f3a96f0435e184.tar.bz2
Restore clarity to macro test.
Diffstat (limited to 'generic/tcl.h')
-rw-r--r--generic/tcl.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tcl.h b/generic/tcl.h
index 129a044..7b3558a 100644
--- a/generic/tcl.h
+++ b/generic/tcl.h
@@ -2503,7 +2503,7 @@ EXTERN void Tcl_GetMemoryInfo(Tcl_DString *dsPtr);
# define Tcl_DecrRefCount(objPtr) \
do { \
Tcl_Obj *_objPtr = (objPtr); \
- if (_objPtr->refCount-- < 2) { \
+ if (--(_objPtr)->refCount <= 0) { \
TclFreeObj(_objPtr); \
} \
} while(0)