diff options
author | aspect <aspect+tclcore@abstracted-spleen.org> | 2017-05-19 14:23:06 (GMT) |
---|---|---|
committer | aspect <aspect+tclcore@abstracted-spleen.org> | 2017-05-19 14:23:06 (GMT) |
commit | 6443ac4f7bee501f197f1589d21fe4100b14d10c (patch) | |
tree | ec5b705e00df96f72bd276aa785472927d7c2eed /generic | |
parent | 3955a1b5e4dfa9568e3d1d7e40f33641570a1211 (diff) | |
parent | 4e6e68ad12b560fd6b201d043653fe8b62ee82a6 (diff) | |
download | tcl-6443ac4f7bee501f197f1589d21fe4100b14d10c.zip tcl-6443ac4f7bee501f197f1589d21fe4100b14d10c.tar.gz tcl-6443ac4f7bee501f197f1589d21fe4100b14d10c.tar.bz2 |
merge core-8-6-branch
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclInt.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 3fed323..14d7179 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -4781,9 +4781,9 @@ MODULE_SCOPE Tcl_PackageInitProc Procbodytest_SafeInit; #define TclSmallFreeEx(interp, memPtr) \ do { \ Tcl_Obj *_objPtr = (Tcl_Obj *) memPtr; \ - objPtr->bytes = NULL; \ - objPtr->typePtr = NULL; \ - objPtr->refCount = 1; \ + _objPtr->bytes = NULL; \ + _objPtr->typePtr = NULL; \ + _objPtr->refCount = 1; \ TclDecrRefCount(_objPtr); \ } while (0) #endif /* TCL_MEM_DEBUG */ |