diff options
author | pooryorick <com.digitalsmarties@pooryorick.com> | 2017-12-20 18:25:08 (GMT) |
---|---|---|
committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2017-12-20 18:25:08 (GMT) |
commit | 5e11793221791b79a9aa3140e6a77c1fe64ec2e9 (patch) | |
tree | cdf0f295d50c5657501889c31f0ad49ca835cae8 /generic/tclNamesp.c | |
parent | dc40e6f7975ff3abcea929e29493bdc7e44c1843 (diff) | |
download | tcl-5e11793221791b79a9aa3140e6a77c1fe64ec2e9.zip tcl-5e11793221791b79a9aa3140e6a77c1fe64ec2e9.tar.gz tcl-5e11793221791b79a9aa3140e6a77c1fe64ec2e9.tar.bz2 |
Further fix for issue [ba1419303b4c]: Delete a namespace for an ensemble having a
deletion trace deletes its namespace: segmentation fault.
Diffstat (limited to 'generic/tclNamesp.c')
-rw-r--r-- | generic/tclNamesp.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c index de10fae..f82d23d 100644 --- a/generic/tclNamesp.c +++ b/generic/tclNamesp.c @@ -1053,7 +1053,6 @@ Tcl_DeleteNamespace( Tcl_DeleteHashTable(&nsPtr->cmdTable); nsPtr ->flags |= NS_DEAD; - TclNsDecrRefCount(nsPtr); } else { /* * Restore the ::errorInfo and ::errorCode traces. @@ -1070,6 +1069,7 @@ Tcl_DeleteNamespace( nsPtr->flags &= ~(NS_DYING|NS_KILLED); } } + TclNsDecrRefCount(nsPtr); } /* |