Add test suite for redis backend.

Currently failing pretty badly. :(

serversession-backend-redis/serversession-backend-redis.cabal

@@ -36,6 +36,22 @@ library
     TypeFamilies
   ghc-options:     -Wall
 
+
+test-suite tests
+  type: exitcode-stdio-1.0
+  hs-source-dirs:  tests
+  build-depends:
+      base, bytestring, containers, hedis, path-pieces, text,
+      time, transformers
+
+    , hspec                     >= 2.1 && < 3
+
+    , serversession
+    , serversession-backend-redis
+  main-is:         Main.hs
+  ghc-options:     -Wall -threaded -with-rtsopts=-N
+
+
 source-repository head
   type:     git
   location: https://github.com/yesodweb/serversession

serversession-backend-redis/tests/Main.hs

@@ -0,0 +1,14 @@
+module Main (main) where
+
+import Database.Redis (connect, defaultConnectInfo)
+import Test.Hspec
+import Web.ServerSession.Backend.Redis
+import Web.ServerSession.Core.StorageTests
+
+import qualified Control.Exception as E
+
+main :: IO ()
+main = do
+  conn <- connect defaultConnectInfo
+  hspec $ describe "AcidStorage on memory only" $ parallel $
+    allStorageTests (RedisStorage conn) it runIO shouldBe shouldReturn shouldThrow