diff options
author | dgp <dgp@users.sourceforge.net> | 2012-12-13 16:16:40 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2012-12-13 16:16:40 (GMT) |
commit | 989c5bb9a47e868bc77b1664f487bcee7fb90b62 (patch) | |
tree | 55d29ef6fd0316b0b528e74f219dc2020548fdda | |
parent | 4557297b08546a1763773f2faae9e3614d34d078 (diff) | |
parent | 94ada5d31fad15023ae03d890aa734b130b8f386 (diff) | |
download | tcl-989c5bb9a47e868bc77b1664f487bcee7fb90b62.zip tcl-989c5bb9a47e868bc77b1664f487bcee7fb90b62.tar.gz tcl-989c5bb9a47e868bc77b1664f487bcee7fb90b62.tar.bz2 |
Restore clarity to macro test.
-rw-r--r-- | generic/tcl.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index 7a21590..145124c 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -2314,7 +2314,7 @@ EXTERN void Tcl_GetMemoryInfo _ANSI_ARGS_((Tcl_DString *dsPtr)); # define Tcl_DecrRefCount(objPtr) \ do { \ Tcl_Obj *_objPtr = (objPtr); \ - if (_objPtr->refCount-- < 2) { \ + if (--(_objPtr)->refCount <= 0) { \ TclFreeObj(_objPtr); \ } \ } while(0) |