summaryrefslogtreecommitdiffstats
path: root/generic/tclRegexp.c
diff options
context:
space:
mode:
authordgp@users.sourceforge.net <dgp>2011-04-27 18:23:39 (GMT)
committerdgp@users.sourceforge.net <dgp>2011-04-27 18:23:39 (GMT)
commit5153c5535d0c6ff6cba5d3d500041ac9aba732f7 (patch)
tree49158d5108ad115f779f031e7d855af9adbb7319 /generic/tclRegexp.c
parent64114377fc34ea860b1452ccec04c141a4d650e8 (diff)
downloadtcl-5153c5535d0c6ff6cba5d3d500041ac9aba732f7.zip
tcl-5153c5535d0c6ff6cba5d3d500041ac9aba732f7.tar.gz
tcl-5153c5535d0c6ff6cba5d3d500041ac9aba732f7.tar.bz2
Backport fix for [Bug 2857044].
Diffstat (limited to 'generic/tclRegexp.c')
-rw-r--r--generic/tclRegexp.c1
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;
}
/*