diff options
author | dgp <dgp@users.sourceforge.net> | 2011-04-27 18:23:39 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2011-04-27 18:23:39 (GMT) |
commit | 135d6f15948ff19fce36aee9d4bac3240bf0f3a5 (patch) | |
tree | 49158d5108ad115f779f031e7d855af9adbb7319 /generic/tclRegexp.c | |
parent | 59b52c5eb0ac2364f909d4796f125bac38099d35 (diff) | |
download | tcl-135d6f15948ff19fce36aee9d4bac3240bf0f3a5.zip tcl-135d6f15948ff19fce36aee9d4bac3240bf0f3a5.tar.gz tcl-135d6f15948ff19fce36aee9d4bac3240bf0f3a5.tar.bz2 |
Backport fix for [Bug 2857044].
Diffstat (limited to 'generic/tclRegexp.c')
-rw-r--r-- | generic/tclRegexp.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclRegexp.c b/generic/tclRegexp.c index ed47dc9..d340f4c 100644 --- a/generic/tclRegexp.c +++ b/generic/tclRegexp.c @@ -756,6 +756,7 @@ FreeRegexpInternalRep( if (--(regexpRepPtr->refCount) <= 0) { FreeRegexp(regexpRepPtr); } + objPtr->typePtr = NULL; } /* |