diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-05-22 13:14:18 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-05-22 13:14:18 (GMT) |
| commit | 7965559c05c8486d58c99cedefbf77ab75474374 (patch) | |
| tree | 3ce3f8ace92049d8fe8bc8ccd2a25f47b9cece75 | |
| parent | 4ee4a959b953c3c3603321ab36b00d32a10b905d (diff) | |
| download | tcl-7965559c05c8486d58c99cedefbf77ab75474374.zip tcl-7965559c05c8486d58c99cedefbf77ab75474374.tar.gz tcl-7965559c05c8486d58c99cedefbf77ab75474374.tar.bz2 | |
silence compiler warning
| -rw-r--r-- | generic/tclCmdIL.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclCmdIL.c b/generic/tclCmdIL.c index 98ec8b4..ea9c1e4 100644 --- a/generic/tclCmdIL.c +++ b/generic/tclCmdIL.c @@ -3460,7 +3460,8 @@ Tcl_LsortObjCmd( int objc, /* Number of arguments. */ Tcl_Obj *const objv[]) /* Argument values. */ { - int i, j, index, indices, length, nocase = 0, sortMode, indexc; + int i, j, index, indices, length, nocase = 0, indexc; + int sortMode = SORTMODE_ASCII; Tcl_Obj *resultPtr, *cmdPtr, **listObjPtrs, *listObj, *indexPtr; SortElement *elementArray, *elementPtr; SortInfo sortInfo; /* Information about this sort that needs to |