From 748a2da3e84893b9034d55372e332d3d1eebb129 Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Fri, 20 May 2011 11:44:09 +0200
Subject: [PATCH] Print version info before running the test

---
 tests/test_helper.tcl   | 1 +
 tests/unit/printver.tcl | 6 ++++++
 2 files changed, 7 insertions(+)
 create mode 100644 tests/unit/printver.tcl

diff --git a/tests/test_helper.tcl b/tests/test_helper.tcl
index 2b7a89577..5e12e05d7 100644
--- a/tests/test_helper.tcl
+++ b/tests/test_helper.tcl
@@ -108,6 +108,7 @@ proc cleanup {} {
 }
 
 proc execute_everything {} {
+    execute_tests "unit/printver"
     execute_tests "unit/auth"
     execute_tests "unit/protocol"
     execute_tests "unit/basic"
diff --git a/tests/unit/printver.tcl b/tests/unit/printver.tcl
new file mode 100644
index 000000000..c80f45144
--- /dev/null
+++ b/tests/unit/printver.tcl
@@ -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)"
+}
-- 
GitLab