1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c
index 275e0ce..b0d4ee0 100644
--- a/generic/tclNamesp.c
+++ b/generic/tclNamesp.c
@@ -5056,7 +5056,7 @@ void
 TclErrorStackResetIf(
     Tcl_Interp *interp,
     const char *msg,
-    int length)
+    size_t length)
 {
     Interp *iPtr = (Interp *) interp;
 
@@ -5111,7 +5111,7 @@ Tcl_LogCommandInfo(
 				 * command (must be <= command). */
     const char *command,	/* First character in command that generated
 				 * the error. */
-    int length)			/* Number of bytes in command (-1 means use
+    size_t length)		/* Number of bytes in command ((size_t)-1 means use
 				 * all bytes up to first null byte). */
 {
     TclLogCommandInfo(interp, script, command, length, NULL, NULL);