redict/tests/support/benchmark.tcl

proc redisbenchmark {host port {opts {}}} {
    set cmd [list src/redis-benchmark -h $host -p $port]
    lappend cmd {*}$opts
    return $cmd
}
redis-benchmark: add tests, --version, a minor bug fixes (#7947) - add test suite coverage for redis-benchmark - add --version (similar to what redis-cli has) - fix bug sending more requests than intended when pipeline > 1. - when done sending requests, avoid freeing client in the write handler, in theory before responses are received (probably dead code since the read handler will call clientDone first) Co-authored-by: Oran Agra <oran@redislabs.com> 2020-10-26 02:04:59 -04:00			`proc redisbenchmark {host port {opts {}}} {`
			`set cmd [list src/redis-benchmark -h $host -p $port]`
			`lappend cmd {*}$opts`
			`return $cmd`
			`}`