use port_getn instead of port_get

[redis.git] / tests / support / util.tcl

diff --git a/tests/support/util.tcl b/tests/support/util.tcl
index a39a2134b5f5209cd60c338b432d9ec7477564b8..675d57f78ad51f586d51849c89bc7aa2ba29584e 100644 (file)
--- a/tests/support/util.tcl
+++ b/tests/support/util.tcl
@@ -294,3 +294,7 @@ proc csvdump r {
 proc csvstring s {
     return "\"$s\""
 }
+
+proc roundFloat f {
+    format "%.10g" $f
+}