Commit 7a6ae0a2 authored by Pieter Noordhuis's avatar Pieter Noordhuis
Browse files

scope res variable outside test

parent 7f7499ee
...@@ -9,6 +9,7 @@ start_server {tags {"sort"}} { ...@@ -9,6 +9,7 @@ start_server {tags {"sort"}} {
} {1 10 2 3} } {1 10 2 3}
tags {"slow"} { tags {"slow"} {
set res {}
test {Create a random list and a random set} { test {Create a random list and a random set} {
set tosort {} set tosort {}
array set seenrand {} array set seenrand {}
...@@ -31,7 +32,6 @@ start_server {tags {"sort"}} { ...@@ -31,7 +32,6 @@ start_server {tags {"sort"}} {
lappend tosort [list $i $rint] lappend tosort [list $i $rint]
} }
set sorted [lsort -index 1 -real $tosort] set sorted [lsort -index 1 -real $tosort]
set res {}
for {set i 0} {$i < 10000} {incr i} { for {set i 0} {$i < 10000} {incr i} {
lappend res [lindex $sorted $i 0] lappend res [lindex $sorted $i 0]
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment