From abb3385e8d9b3edc2d85561854b0d2a0c34d3743 Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Wed, 6 Jul 2016 11:50:13 +0200
Subject: [PATCH] Regression test for issue #3333.

---
 tests/unit/expire.tcl | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/tests/unit/expire.tcl b/tests/unit/expire.tcl
index ff3dacb3..0a50dd31 100644
--- a/tests/unit/expire.tcl
+++ b/tests/unit/expire.tcl
@@ -198,4 +198,10 @@ start_server {tags {"expire"}} {
         r set foo b
         lsort [r keys *]
     } {a e foo s t}
+
+    test {EXPIRE with empty string as TTL should report an error} {
+        r set foo bar
+        catch {r expire foo ""} e
+        set e
+    } {*not an integer*}
 }