diff options
| author | dgp@users.sourceforge.net <dgp> | 2013-05-22 13:14:18 (GMT) |
|---|---|---|
| committer | dgp@users.sourceforge.net <dgp> | 2013-05-22 13:14:18 (GMT) |
| commit | f6e3222cc1ab9eb8ee85df6d45184b535ef2ab88 (patch) | |
| tree | 3ce3f8ace92049d8fe8bc8ccd2a25f47b9cece75 | |
| parent | ae092efa7333772a2e727927c92ace2d7574c613 (diff) | |
| download | tcl-f6e3222cc1ab9eb8ee85df6d45184b535ef2ab88.zip tcl-f6e3222cc1ab9eb8ee85df6d45184b535ef2ab88.tar.gz tcl-f6e3222cc1ab9eb8ee85df6d45184b535ef2ab88.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 |