diff options
| author | dgp <dgp@users.sourceforge.net> | 2017-05-23 13:25:07 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2017-05-23 13:25:07 (GMT) |
| commit | 4cd1e4ceff0f24728a6444ac699b58a3461f8447 (patch) | |
| tree | 33067220a99eb9d89322eb8a9274e1302374739b /generic | |
| parent | 63e77cfac497ed6dc339c4b229d28bb30951e939 (diff) | |
| parent | f6e07341e6d9bc5be18d57dc08c1bed03f036212 (diff) | |
| download | tcl-4cd1e4ceff0f24728a6444ac699b58a3461f8447.zip tcl-4cd1e4ceff0f24728a6444ac699b58a3461f8447.tar.gz tcl-4cd1e4ceff0f24728a6444ac699b58a3461f8447.tar.bz2 | |
merge 8.6
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 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 */ |