diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-05-22 13:34:46 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-05-22 13:34:46 (GMT) |
| commit | 954c40f0e8c4fb566439235986ee384efc88ad0f (patch) | |
| tree | accd078c9decded9fd73218f0140fb06519b92c5 /generic/tclCmdIL.c | |
| parent | 0e1a083787efebde534b0323ba4cca840630fe71 (diff) | |
| parent | 376e9d0e30ef379c2c5c8de337f2467cbdb835e8 (diff) | |
| download | tcl-954c40f0e8c4fb566439235986ee384efc88ad0f.zip tcl-954c40f0e8c4fb566439235986ee384efc88ad0f.tar.gz tcl-954c40f0e8c4fb566439235986ee384efc88ad0f.tar.bz2 | |
silence compiler warning
Diffstat (limited to 'generic/tclCmdIL.c')
| -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 ac317e0..0e33392 100644 --- a/generic/tclCmdIL.c +++ b/generic/tclCmdIL.c @@ -3645,7 +3645,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; int group, groupSize, groupOffset, idx, allocatedIndexVector = 0; Tcl_Obj *resultPtr, *cmdPtr, **listObjPtrs, *listObj, *indexPtr; SortElement *elementArray, *elementPtr; |