Many improvements, bug fixes

*: Allow math functions to be enabled via configure
*: Allow support for references to be removed
*: Documentation updates
*: Jim_ListLength() now returns the result directly
*: Optimise list -> dict conversion
*: Consistent capitalisation of some structures, functions
*: Add support for abbreviations to Jim_GetEnum()
*: The commands to 'info' may be abbreviated
*: Use abbreviation support in parsing options to 'subst'
*: Use Jim_GetEnum() to parse return code names
*: Optimise 'array get', 'array set' if no conversion needed
*: Import Tcl string.test
*: string compare now returns -1,0,1 like Tcl
*: Fix 'string last' with index=0
*: Add support for 'string reverse'
*: Add -nocase option to 'string equal'
*: Fix infinite loop in 'string repeat str -1'
*: Support braced patterns in glob
*: glob should not return dot files unless the pattern starts with .
*: Simplify glob.tcl by using some new features
*: When creating C extensions from Tcl, preserve newlines and invoke
   with Jim_Eval_Named() to produce more meaningful error messages.
*: Also remove all comments, not just those starting in the first column
*: Add support for 'n+n' and 'n-n' in string/list indexes (Tcl 8.5)
*: Add a level to the stack trace for 'return -code error'
*: 'return -code' should also affect the return from 'source' (see Tcl docs)
*: Fix lsort -command
*: Some systems don't have INFINITY

1 files changed, 78 insertions, 1 deletions

diff --git a/tests/misc.test b/tests/misc.test
index c5d45e5..53c37eb 100644
--- a/tests/misc.test
+++ b/tests/misc.test
@@ -123,6 +123,83 @@ test lrepeat-1.8 "Errors" {
 	catch {lrepeat -10 a}
 } {1}
 
-section "unset"
+section "string/list index"
+
+test lindex-1.1 "Integer" {
+	lindex {a b c} 0
+} a
+
+test lindex-1.1 "Integer" {
+	lindex {a b c} 2
+} c
+
+test lindex-1.1 "Integer" {
+	lindex {a b c} -1
+} {}
+
+test lindex-1.1 "Integer" {
+	lindex {a b c} 4
+} {}
+
+test lindex-1.1 "end" {
+	lindex {a b c} end
+} c
+
+test lindex-1.1 "end" {
+	lindex {a b c} end-1
+} b
+
+test lindex-1.1 "end" {
+	lindex {a b c} end-4
+} {}
+
+test lindex-1.1 "end - errors" {
+	catch {lindex {a b c} end-}
+} 1
+
+test lindex-1.1 "end - errors" {
+	catch {lindex {a b c} end-blah}
+} 1
+
+test lindex-1.1 "end - errors" {
+	catch {lindex {a b c} end+1}
+} 1
+
+test lindex-1.1 "int+int, int-int" {
+	lindex {a b c} 0+1
+} b
+
+test lindex-1.1 "int+int, int-int" {
+	lindex {a b c} 0+4
+} {}
+
+test lindex-1.1 "int+int, int-int" {
+	lindex {a b c} 3-1
+} c
+
+test lindex-1.1 "int+int, int-int" {
+	lindex {a b c} 1--1
+} c
+
+test lindex-1.1 "int+int, int-int" {
+	set l {a b c}
+	lindex $l [lsearch $l b]-1
+} a
+
+test lindex-1.1 "int+int - errors" {
+	catch {lindex {a b c} 5+blah}
+} 1
+
+test lindex-1.1 "int+int - errors" {
+	catch {lindex {a b c} 5-blah}
+} 1
+
+test lindex-1.1 "int+int - errors" {
+	catch {lindex {a b c} blah-2}
+} 1
+
+test lindex-1.1 "unary plus" {
+	lindex {a b c} +2
+} c
 
 testreport