diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-05-21 15:03:29 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-05-21 15:03:29 (GMT) |
| commit | 1b1780b917d827f7590fc19b13231dbf78b1881e (patch) | |
| tree | 8118789f141a1e19964d90fa1954713b2b26486a /generic/tclExecute.c | |
| parent | ca847ce2da18c94af64979c1c20930beeeda9a80 (diff) | |
| parent | 58cdaeb15dc1162422b2998aa7700df724dcaf2d (diff) | |
| download | tcl-1b1780b917d827f7590fc19b13231dbf78b1881e.zip tcl-1b1780b917d827f7590fc19b13231dbf78b1881e.tar.gz tcl-1b1780b917d827f7590fc19b13231dbf78b1881e.tar.bz2 | |
Merge 8.7. Some int -> Tcl_Size
Diffstat (limited to 'generic/tclExecute.c')
| -rw-r--r-- | generic/tclExecute.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclExecute.c b/generic/tclExecute.c index 79bfb11..ef42940 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -1848,7 +1848,7 @@ ArgumentBCEnter( ByteCode *codePtr, TEBCdata *tdPtr, const unsigned char *pc, - int objc, + Tcl_Size objc, Tcl_Obj **objv) { Tcl_Size cmd; @@ -9167,7 +9167,7 @@ IllegalExprOperandType( Tcl_Obj * TclGetSourceFromFrame( CmdFrame *cfPtr, - int objc, + Tcl_Size objc, Tcl_Obj *const objv[]) { if (cfPtr == NULL) { @@ -9175,7 +9175,7 @@ TclGetSourceFromFrame( } if (cfPtr->cmdObj == NULL) { if (cfPtr->cmd == NULL) { - ByteCode *codePtr = (ByteCode *) cfPtr->data.tebc.codePtr; + ByteCode *codePtr = (ByteCode *)cfPtr->data.tebc.codePtr; cfPtr->cmd = GetSrcInfoForPc((unsigned char *) cfPtr->data.tebc.pc, codePtr, &cfPtr->len, NULL, NULL); @@ -9557,7 +9557,7 @@ TclExprFloatError( int TclLog2( - int value) /* The integer for which to compute the log + int value) /* The integer for which to compute the log * base 2. */ { int n = value; |