summaryrefslogtreecommitdiffstats
path: root/generic/tclNamesp.c
diff options
context:
space:
mode:
authorpooryorick <com.digitalsmarties@pooryorick.com>2017-12-20 18:25:08 (GMT)
committerpooryorick <com.digitalsmarties@pooryorick.com>2017-12-20 18:25:08 (GMT)
commit5e11793221791b79a9aa3140e6a77c1fe64ec2e9 (patch)
treecdf0f295d50c5657501889c31f0ad49ca835cae8 /generic/tclNamesp.c
parentdc40e6f7975ff3abcea929e29493bdc7e44c1843 (diff)
downloadtcl-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.c2
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);
}
/*