diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-07-14 17:58:45 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-07-14 17:58:45 (GMT) |
| commit | bd8c790e2e0263e5f0db98b9cf07230a8c2b1b41 (patch) | |
| tree | 7474b787632a5ddfa8d43f88a5a1d638c63a94a8 /generic/tclNamesp.c | |
| parent | 5c3b0101a22b87ccbbbf68eb44de15ea44fd86c4 (diff) | |
| download | tcl-bd8c790e2e0263e5f0db98b9cf07230a8c2b1b41.zip tcl-bd8c790e2e0263e5f0db98b9cf07230a8c2b1b41.tar.gz tcl-bd8c790e2e0263e5f0db98b9cf07230a8c2b1b41.tar.bz2 | |
Stop checking case that can never happen.
Diffstat (limited to 'generic/tclNamesp.c')
| -rw-r--r-- | generic/tclNamesp.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c index 5930859..1fef919 100644 --- a/generic/tclNamesp.c +++ b/generic/tclNamesp.c @@ -2883,9 +2883,9 @@ GetNamespaceFromObj( resNamePtr = objPtr->internalRep.twoPtrValue.ptr1; nsPtr = resNamePtr->nsPtr; refNsPtr = resNamePtr->refNsPtr; - if (!(nsPtr->flags & NS_DYING) && (interp == nsPtr->interp) && - (!refNsPtr || ((interp == refNsPtr->interp) && - (refNsPtr== (Namespace *) Tcl_GetCurrentNamespace(interp))))){ + if (!(nsPtr->flags & NS_DYING) && (interp == nsPtr->interp) + && (!refNsPtr || (refNsPtr == + (Namespace *) TclGetCurrentNamespace(interp)))) { *nsPtrPtr = (Tcl_Namespace *) nsPtr; return TCL_OK; } @@ -4779,7 +4779,7 @@ SetNsNameFromAny( if ((name[0] == ':') && (name[1] == ':')) { resNamePtr->refNsPtr = NULL; } else { - resNamePtr->refNsPtr = (Namespace *) Tcl_GetCurrentNamespace(interp); + resNamePtr->refNsPtr = (Namespace *) TclGetCurrentNamespace(interp); } resNamePtr->refCount = 1; TclFreeIntRep(objPtr); |