Add initial test and setup fig.sh for redis in docker

README.md

@@ -48,6 +48,30 @@ then use `memo-f` like you would use your usual memoized fn:
 => (memo-f some-input) ;=> some-output
 ```
 
+### Tests
+
+You can run tests in a Docker container via [fig.sh][4]:
+
+```
+$ fig up
+```
+
+You can also run tests interactively from a REPL:
+
+```
+$ fig run lein repl
+```
+
+```clj
+=> (require 'crache.memo-test)
+=> (in-ns 'crache.memo-test)
+=> (run-tests)
+```
+
+> **OSX:** Docker on OSX is a little tricky. Use [boot2docker][5] and get
+> VirtualBox configured so it can map directories from the host into the
+> container. Here is [a pretty good intro to docker on OSX][5].
+
 ### License
 -------
 Copyright (C) 2014 Homer Strong
@@ -57,3 +81,5 @@ Distributed under the Eclipse Public License, the same as Clojure.
 [1]: https://clojars.org/crache/latest-version.svg?raw=true
 [2]: https://clojars.org/crache
 [3]: https://github.com/ptaoussanis/carmine#connections
+[4]: http://www.fig.sh/index.html
+[5]: http://viget.com/extend/how-to-use-docker-on-os-x-the-missing-guide

fig.yml

@@ -0,0 +1,11 @@
+redis:
+  image: orchardup/redis
+  ports:
+    - "6379"
+lein:
+  image: pandeiro/lein
+  links:
+    - redis:db
+  volumes:
+    - .:/project
+  command: test

test/crache/memo_test.clj

@@ -0,0 +1,19 @@
+(ns crache.memo-test
+  (:require [clojure.test :refer :all]
+            [crache.memo :refer :all]))
+
+(defonce conn
+  {:pool {}
+   :spec {:host (System/getenv "DB_PORT_6379_TCP_ADDR")
+          :port (Integer/parseInt (System/getenv "DB_PORT_6379_TCP_PORT"))}})
+
+(deftest a-test
+  (testing "Memoize a function"
+    (let [f (memo-redis (fn [x] (System/currentTimeMillis)) conn (str ::memo) 5)
+          v (f 10)]
+      (is (= v (f 10)))
+      (is (= v (f 10)))
+      (Thread/sleep 5500)
+      (let [v' (f 10)]
+        (is (not= v v'))
+        (is (= v' (f 10)))))))