diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2014-07-18 22:05:16 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2014-07-18 22:05:16 (GMT) |
| commit | b32141b751698c59b7c8b574b52963976f3e0dd4 (patch) | |
| tree | b0062290c77cc2a04a544ce224cd35faa7d50799 /generic/tclOO.c | |
| parent | 1bd8f407a5fc44a8b7a54bb78d8d29a2e5b0358f (diff) | |
| download | tcl-b32141b751698c59b7c8b574b52963976f3e0dd4.zip tcl-b32141b751698c59b7c8b574b52963976f3e0dd4.tar.gz tcl-b32141b751698c59b7c8b574b52963976f3e0dd4.tar.bz2 | |
[75b8433707] Plug a subtle memory leak in TclOO.
bug_75b8433707
Test suite very unhappy with this. Shoving into
a mistake branch until that's sorted.
Diffstat (limited to 'generic/tclOO.c')
| -rw-r--r-- | generic/tclOO.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclOO.c b/generic/tclOO.c index de00733..74de6d0 100644 --- a/generic/tclOO.c +++ b/generic/tclOO.c @@ -1280,6 +1280,7 @@ TclOORemoveFromInstances( removeInstance: if (Deleted(clsPtr->thisPtr)) { + DelRef(clsPtr->instances.list[i]); clsPtr->instances.list[i] = NULL; } else { clsPtr->instances.num--; |