From e94e87f219ee898172f060081bca47d62f1908a1 Mon Sep 17 00:00:00 2001
From: Brad Anderson <brad@cloudant.com>
Date: Tue, 30 Mar 2010 18:50:58 -0400
Subject: test clock, and add some dialyzer specs for mem3

---
 test/mem3_test.erl | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'test')

diff --git a/test/mem3_test.erl b/test/mem3_test.erl
index 99f32ff9..8747cf02 100644
--- a/test/mem3_test.erl
+++ b/test/mem3_test.erl
@@ -16,6 +16,7 @@ all_tests_test_() ->
            {with, Pid,
             [
              fun init/1,
+             fun clock/1,
              fun join_first/1
             ]}
        end}
@@ -42,6 +43,12 @@ init(_Pid) ->
     ?assertEqual(true, Test).
 
 
+clock(_Pid) ->
+    Node = node(),
+    Clock = mem3:clock(),
+    ?assertMatch([{Node, _}], Clock).
+
+
 join_first(_Pid) ->
     mem3:join(first, [{1, a, []}, {2, b, []}]),
     Fullmap = mem3:fullmap(),
-- 
cgit v1.2.3