Index: generic/nsf.c =================================================================== diff -u -N -r20c5ebb61ce86e3db8795a5cc7e94fe0d672b4ad -ra25c4bed9bbde4420c60d971812ed29510ed941b --- generic/nsf.c (.../nsf.c) (revision 20c5ebb61ce86e3db8795a5cc7e94fe0d672b4ad) +++ generic/nsf.c (.../nsf.c) (revision a25c4bed9bbde4420c60d971812ed29510ed941b) @@ -9615,7 +9615,7 @@ static int CanInvokeMixinMethod(Tcl_Interp *interp, NsfObject *object, Tcl_Command cmd, NsfCmdList *cmdList) { int result = TCL_OK; - unsigned long cmdFlags = (unsigned long)Tcl_Command_flags(cmd); + unsigned int cmdFlags = (unsigned int)Tcl_Command_flags(cmd); nonnull_assert(interp != NULL); nonnull_assert(object != NULL); @@ -13298,7 +13298,7 @@ #if 1 if (subMethodCmd != NULL) { - unsigned long cmdFlags = (unsigned long)Tcl_Command_flags(subMethodCmd); + unsigned int cmdFlags = (unsigned int)Tcl_Command_flags(subMethodCmd); if ((cscPtr->flags & (NSF_CM_LOCAL_METHOD|NSF_CM_IGNORE_PERMISSIONS)) == 0u && (cmdFlags & NSF_CMD_CALL_PRIVATE_METHOD) != 0u) { @@ -14360,7 +14360,7 @@ */ if (likely(cmd && (flags & NSF_CM_IGNORE_PERMISSIONS) == 0u)) { - unsigned long cmdFlags = (unsigned long)Tcl_Command_flags(cmd); + unsigned int cmdFlags = (unsigned int)Tcl_Command_flags(cmd); #if !defined(NDEBUG) if (unlikely(((cmdFlags & NSF_CMD_CALL_PRIVATE_METHOD) != 0u) @@ -24171,11 +24171,11 @@ static int ProtectionMatches(int withCallprotection, Tcl_Command cmd) { int result, isProtected, isPrivate; - unsigned long cmdFlags; + unsigned int cmdFlags; nonnull_assert(cmd != NULL); - cmdFlags = (unsigned long)Tcl_Command_flags(cmd); + cmdFlags = (unsigned int)Tcl_Command_flags(cmd); isProtected = (cmdFlags & NSF_CMD_CALL_PROTECTED_METHOD) != 0u; isPrivate = (cmdFlags & NSF_CMD_CALL_PRIVATE_METHOD) != 0u;