diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-07 11:25:22 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-03-07 11:25:22 (GMT) |
commit | 5e2de17d9be405ccfdc6ef6311e9b7a8bff4645b (patch) | |
tree | 3100ea5c122955250d68375ade8affdf781c1f93 /generic/tclProc.c | |
parent | c24caafde61a8d2218c0ec117f8a8f0e0bdaf3ad (diff) | |
download | tcl-5e2de17d9be405ccfdc6ef6311e9b7a8bff4645b.zip tcl-5e2de17d9be405ccfdc6ef6311e9b7a8bff4645b.tar.gz tcl-5e2de17d9be405ccfdc6ef6311e9b7a8bff4645b.tar.bz2 |
Another round of int -> size_t for internal functions
Diffstat (limited to 'generic/tclProc.c')
-rw-r--r-- | generic/tclProc.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c index d3e2ceb..c4c6de1 100644 --- a/generic/tclProc.c +++ b/generic/tclProc.c @@ -1504,7 +1504,7 @@ TclPushProcCallFrame( * interpreted. */ Tcl_Interp *interp,/* Interpreter in which procedure was * invoked. */ - int objc, /* Count of number of arguments to this + size_t objc1, /* Count of number of arguments to this * procedure. */ Tcl_Obj *const objv[], /* Argument value objects. */ int isLambda) /* 1 if this is a call by ApplyObjCmd: it @@ -1515,6 +1515,7 @@ TclPushProcCallFrame( CallFrame *framePtr, **framePtrPtr; int result; ByteCode *codePtr; + int objc = objc1; /* * If necessary (i.e. if we haven't got a suitable compilation already |