diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-17 13:29:34 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-02-17 13:29:34 (GMT) |
| commit | 2127c83a98e1d0df1cf9df3ce6d34ae147c6bc95 (patch) | |
| tree | 17e908fe2da432274f52ae705fa7c6a87799d202 /generic/tclInterp.c | |
| parent | 54198747bb48292d91a43b0e328aebb6d8eaa1df (diff) | |
| download | tcl-2127c83a98e1d0df1cf9df3ce6d34ae147c6bc95.zip tcl-2127c83a98e1d0df1cf9df3ce6d34ae147c6bc95.tar.gz tcl-2127c83a98e1d0df1cf9df3ce6d34ae147c6bc95.tar.bz2 | |
More int -> size_t in API
Diffstat (limited to 'generic/tclInterp.c')
| -rw-r--r-- | generic/tclInterp.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclInterp.c b/generic/tclInterp.c index e6e552e..24118bb 100644 --- a/generic/tclInterp.c +++ b/generic/tclInterp.c @@ -1199,12 +1199,12 @@ Tcl_CreateAlias( const char *childCmd, /* Command to install in child. */ Tcl_Interp *targetInterp, /* Interpreter for target command. */ const char *targetCmd, /* Name of target command. */ - int argc, /* How many additional arguments? */ + size_t argc, /* How many additional arguments? */ const char *const *argv) /* These are the additional args. */ { Tcl_Obj *childObjPtr, *targetObjPtr; Tcl_Obj **objv; - int i; + size_t i; int result; objv = (Tcl_Obj **)TclStackAlloc(childInterp, sizeof(Tcl_Obj *) * argc); @@ -1254,7 +1254,7 @@ Tcl_CreateAliasObj( const char *childCmd, /* Command to install in child. */ Tcl_Interp *targetInterp, /* Interpreter for target command. */ const char *targetCmd, /* Name of target command. */ - int objc, /* How many additional arguments? */ + size_t objc, /* How many additional arguments? */ Tcl_Obj *const objv[]) /* Argument vector. */ { Tcl_Obj *childObjPtr, *targetObjPtr; |