diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2012-11-26 15:48:48 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2012-11-26 15:48:48 (GMT) |
commit | 06b96a084a91f3fbbec0cc9da6069d8e5c423355 (patch) | |
tree | 3bdc15f6a7ceb483f6483319e25ce5c8f80dfab8 | |
parent | ea355fdb79d026f47b4788f2a55d8b0da06195ed (diff) | |
download | tcl-06b96a084a91f3fbbec0cc9da6069d8e5c423355.zip tcl-06b96a084a91f3fbbec0cc9da6069d8e5c423355.tar.gz tcl-06b96a084a91f3fbbec0cc9da6069d8e5c423355.tar.bz2 |
missed a spot in an unsaved file...
-rw-r--r-- | generic/tclCmdIL.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCmdIL.c b/generic/tclCmdIL.c index c88b7dc..dc98ef1 100644 --- a/generic/tclCmdIL.c +++ b/generic/tclCmdIL.c @@ -4495,7 +4495,7 @@ SelectObjFromSublist( index += listLen + 1; } - if (Tcl_ListObjIndex(infoPtr->interp, objPtr, index, + if (Tcl_ListObjIndex(infoPtr->interp, objPtr, (size_t) index, ¤tObj) != TCL_OK) { infoPtr->resultCode = TCL_ERROR; return NULL; |