From 20c0d8a18aa186f79857ff82f5e5d202b952fdd5 Mon Sep 17 00:00:00 2001 From: sebres Date: Mon, 24 Jun 2019 10:31:37 +0000 Subject: amend to [f3d49044c4e658a7]: resolve warnings (signed/unsigned comparisons, if compiled with MSVC) --- generic/tclNamesp.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c index 426fd16..7259384 100644 --- a/generic/tclNamesp.c +++ b/generic/tclNamesp.c @@ -430,7 +430,7 @@ Tcl_PopCallFrame( */ nsPtr = framePtr->nsPtr; - if ((--nsPtr->activationCount <= (nsPtr == iPtr->globalNsPtr)) + if ((--nsPtr->activationCount <= (unsigned)(nsPtr == iPtr->globalNsPtr)) && (nsPtr->flags & NS_DYING)) { Tcl_DeleteNamespace((Tcl_Namespace *) nsPtr); } @@ -1023,7 +1023,7 @@ Tcl_DeleteNamespace( * refCount reaches 0. */ - if (nsPtr->activationCount > (nsPtr == globalNsPtr)) { + if (nsPtr->activationCount > (unsigned)(nsPtr == globalNsPtr)) { nsPtr->flags |= NS_DYING; if (nsPtr->parentPtr != NULL) { entryPtr = Tcl_FindHashEntry( -- cgit v0.12