diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2025-04-17 14:47:13 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2025-04-17 14:47:13 (GMT) |
| commit | 7add1b667d2f8b5d5c914b4b4a0676548cc528e8 (patch) | |
| tree | 9c23fced7d752bf3841c88e97625905e343409a5 /generic/tclBasic.c | |
| parent | ace71ee517ffeb23cd22fb6066bb51037105fa43 (diff) | |
| download | tcl-7add1b667d2f8b5d5c914b4b4a0676548cc528e8.zip tcl-7add1b667d2f8b5d5c914b4b4a0676548cc528e8.tar.gz tcl-7add1b667d2f8b5d5c914b4b4a0676548cc528e8.tar.bz2 | |
Another round of -Wconversion warning fixes, see [03cff7a777]
Diffstat (limited to 'generic/tclBasic.c')
| -rw-r--r-- | generic/tclBasic.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c index 317f6de..243009b 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -5852,7 +5852,7 @@ TclArgumentBCEnter( Tcl_Size pc) { ExtCmdLoc *eclPtr; - Tcl_Size word; + int word; ECL *ePtr; CFWordBC *lastPtr = NULL; Interp *iPtr = (Interp *) interp; @@ -6105,7 +6105,7 @@ TclEvalObjEx( * evaluation of the script. Supported values * are TCL_EVAL_GLOBAL and TCL_EVAL_DIRECT. */ const CmdFrame *invoker, /* Frame of the command doing the eval. */ - int word) /* Index of the word which is in objPtr. */ + int word) /* Index of the word which is in objPtr. */ { int result = TCL_OK; NRE_callback *rootPtr = TOP_CB(interp); @@ -6124,7 +6124,7 @@ TclNREvalObjEx( * evaluation of the script. Supported values * are TCL_EVAL_GLOBAL and TCL_EVAL_DIRECT. */ const CmdFrame *invoker, /* Frame of the command doing the eval. */ - int word) /* Index of the word which is in objPtr. */ + int word) /* Index of the word which is in objPtr. */ { Interp *iPtr = (Interp *) interp; int result; |