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 | 10f81d78ff4d5f5931412700726ce05d14d02fad (patch) | |
| tree | 7474b787632a5ddfa8d43f88a5a1d638c63a94a8 /generic | |
| parent | 35eb3535af4c4a03667bbf2b4fcde538d5e875fe (diff) | |
| download | tcl-10f81d78ff4d5f5931412700726ce05d14d02fad.zip tcl-10f81d78ff4d5f5931412700726ce05d14d02fad.tar.gz tcl-10f81d78ff4d5f5931412700726ce05d14d02fad.tar.bz2 | |
Stop checking case that can never happen.
Diffstat (limited to 'generic')
| -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); |