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 | 376e9d0e30ef379c2c5c8de337f2467cbdb835e8 (patch) | |
tree | 3ce3f8ace92049d8fe8bc8ccd2a25f47b9cece75 /generic | |
parent | a515427b5b0f2be828866a2073b4720681e10e0d (diff) | |
download | tcl-376e9d0e30ef379c2c5c8de337f2467cbdb835e8.zip tcl-376e9d0e30ef379c2c5c8de337f2467cbdb835e8.tar.gz tcl-376e9d0e30ef379c2c5c8de337f2467cbdb835e8.tar.bz2 |
silence compiler warning
Diffstat (limited to 'generic')
-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 |