diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-08-28 20:54:41 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-08-28 20:54:41 (GMT) |
commit | 6af3bbdb48a3f902adcc2e23a05dbfdb31a86fd4 (patch) | |
tree | 87e9741ce6fee4c773c9df5ff6a1dc681a3b00a7 /generic/tclCmdIL.c | |
parent | c48c8e6b846b3247604509743f1e958d497e5893 (diff) | |
parent | f0a6c93a0e89c86140a0c5f3a19db9c38628d1d8 (diff) | |
download | tcl-6af3bbdb48a3f902adcc2e23a05dbfdb31a86fd4.zip tcl-6af3bbdb48a3f902adcc2e23a05dbfdb31a86fd4.tar.gz tcl-6af3bbdb48a3f902adcc2e23a05dbfdb31a86fd4.tar.bz2 |
Merge 9.0. More progress in TclOO handling
Diffstat (limited to 'generic/tclCmdIL.c')
-rw-r--r-- | generic/tclCmdIL.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclCmdIL.c b/generic/tclCmdIL.c index 904996e..a4f85dd 100644 --- a/generic/tclCmdIL.c +++ b/generic/tclCmdIL.c @@ -229,9 +229,9 @@ IfConditionCallback( int result) { Interp *iPtr = (Interp *) interp; - int objc = PTR2INT(data[0]); + size_t objc = PTR2INT(data[0]); Tcl_Obj *const *objv = (Tcl_Obj *const *)data[1]; - int i = PTR2INT(data[2]); + size_t i = PTR2INT(data[2]); Tcl_Obj *boolObj = (Tcl_Obj *)data[3]; int value, thenScriptIndex = 0; const char *clause; |