diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-12 13:51:33 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-04-12 13:51:33 (GMT) |
commit | 3d91df248993bec5f3545fa327bf6baef9968331 (patch) | |
tree | 614f3805aefc7b5a12ae9069c21dd8f6be5315da /generic/tclTestObj.c | |
parent | a0d8d381c1e5351ed1085d3a8647ab32b352e0e3 (diff) | |
download | tcl-3d91df248993bec5f3545fa327bf6baef9968331.zip tcl-3d91df248993bec5f3545fa327bf6baef9968331.tar.gz tcl-3d91df248993bec5f3545fa327bf6baef9968331.tar.bz2 |
More int -> Tcl_Size, so (theoretically) longer lists could be handled. Thanks, Rolf!
Diffstat (limited to 'generic/tclTestObj.c')
-rw-r--r-- | generic/tclTestObj.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclTestObj.c b/generic/tclTestObj.c index b24c639..26d33ce 100644 --- a/generic/tclTestObj.c +++ b/generic/tclTestObj.c @@ -899,7 +899,7 @@ TestlistobjCmd( Tcl_Size first; /* First index in the list */ Tcl_Size count; /* Count of elements in a list */ Tcl_Obj **varPtr; - int i, len; + Tcl_Size i, len; if (objc < 3) { Tcl_WrongNumArgs(interp, 1, objv, "option arg ?arg...?"); |