summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authoraspect <aspect+tclcore@abstracted-spleen.org>2017-05-19 14:21:46 (GMT)
committeraspect <aspect+tclcore@abstracted-spleen.org>2017-05-19 14:21:46 (GMT)
commit4e6e68ad12b560fd6b201d043653fe8b62ee82a6 (patch)
tree0ecadc7670565f4bc737af36ad771748889a13aa /generic
parentec28ad63ee76f1827bd000aecc3506d25c484776 (diff)
downloadtcl-4e6e68ad12b560fd6b201d043653fe8b62ee82a6.zip
tcl-4e6e68ad12b560fd6b201d043653fe8b62ee82a6.tar.gz
tcl-4e6e68ad12b560fd6b201d043653fe8b62ee82a6.tar.bz2
fix build failure with TCL_MEM_DEBUG introduced by [8b717dc06a3e3d49]
Diffstat (limited to 'generic')
-rw-r--r--generic/tclInt.h6
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h
index 2938074..7b582c0 100644
--- a/generic/tclInt.h
+++ b/generic/tclInt.h
@@ -4766,9 +4766,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 */