Commit b0e0f3c5 authored by antirez's avatar antirez
Browse files

Test: randomInt() behavior commented.

parent 4e2b97bb
......@@ -91,10 +91,12 @@ proc wait_for_sync r {
}
}
# Random integer between 0 and max (excluded).
proc randomInt {max} {
expr {int(rand()*$max)}
}
# Random signed integer between -max and max (both extremes excluded).
proc randomSignedInt {max} {
set i [randomInt $max]
if {rand() > 0.5} {
......
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