Import Tcl 8.6.12
This commit is contained in:
@@ -441,7 +441,7 @@ test lindex-16.7 {data reuse} {
|
||||
test lindex-17.0 {Bug 1718580} {*}{
|
||||
-body {
|
||||
lindex {} end foo
|
||||
}
|
||||
}
|
||||
-match glob
|
||||
-result {bad index "foo"*}
|
||||
-returnCodes 1
|
||||
@@ -450,7 +450,7 @@ test lindex-17.0 {Bug 1718580} {*}{
|
||||
test lindex-17.1 {Bug 1718580} {*}{
|
||||
-body {
|
||||
lindex a end foo
|
||||
}
|
||||
}
|
||||
-match glob
|
||||
-result {bad index "foo"*}
|
||||
-returnCodes 1
|
||||
|
||||
Reference in New Issue
Block a user