Print version info before running the test

This commit is contained in:
antirez 2011-05-20 11:44:09 +02:00
parent 330c90b018
commit 206d62710c
2 changed files with 7 additions and 0 deletions

View File

@ -110,6 +110,7 @@ proc cleanup {} {
}
proc execute_everything {} {
execute_tests "unit/printver"
execute_tests "unit/auth"
execute_tests "unit/protocol"
execute_tests "unit/basic"

6
tests/unit/printver.tcl Normal file
View File

@ -0,0 +1,6 @@
start_server {} {
set i [r info]
regexp {redis_version:(.*?)\r\n} $i - version
regexp {redis_git_sha1:(.*?)\r\n} $i - sha1
puts "Testing Redis version $version ($sha1)"
}