diff options
| author | dgp <dgp@users.sourceforge.net> | 2018-03-09 17:30:30 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2018-03-09 17:30:30 (GMT) |
| commit | 5fd318bc35bbaa27e006360af375ca2c078b763a (patch) | |
| tree | 6780ef52c16bc5376cd463185fec72c4ef3b7e74 /generic/tclCmdIL.c | |
| parent | 88812125b1c2634264238a902c01c4ed85c9900c (diff) | |
| download | tcl-5fd318bc35bbaa27e006360af375ca2c078b763a.zip tcl-5fd318bc35bbaa27e006360af375ca2c078b763a.tar.gz tcl-5fd318bc35bbaa27e006360af375ca2c078b763a.tar.bz2 | |
More demonstration tests of index value encoding flaws.
Diffstat (limited to 'generic/tclCmdIL.c')
| -rw-r--r-- | generic/tclCmdIL.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclCmdIL.c b/generic/tclCmdIL.c index 0716afe..afb5b62 100644 --- a/generic/tclCmdIL.c +++ b/generic/tclCmdIL.c @@ -3933,6 +3933,9 @@ Tcl_LsortObjCmd( /* * Do not shrink the actual memory block used; that doesn't * work with TclStackAlloc-allocated memory. [Bug 2918962] + * + * TODO: Consider a pointer increment to replace this + * array shift. */ for (i = 0; i < sortInfo.indexc; i++) { |