From ff229367ecce3442ba369ddc25dfc1baad732959 Mon Sep 17 00:00:00 2001
From: Linus Nordberg <linus@nordberg.se>
Date: Thu, 29 May 2014 12:39:37 +0200
Subject: Test adding 200 3kB entries.

---
 src/plop.erl | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'src')

diff --git a/src/plop.erl b/src/plop.erl
index a28f915..853e81a 100644
--- a/src/plop.erl
+++ b/src/plop.erl
@@ -468,3 +468,10 @@ add_test() ->
     SPTeq1 = spt(S#state.logid, S#state.privkey, TE),
     SPTeq2 = spt(S#state.logid, S#state.privkey, TE),
     ?assertNotEqual(SPTeq1, SPTeq2).          % DSA signatures differ!
+
+add_more_test() ->
+    D = crypto:rand_bytes(3072),
+    lists:foreach(
+      fun(D) -> plop:add(#timestamped_entry
+                         {entry = #plop_entry{type = test, data = D}}) end,
+      lists:seq(0, 200)).
-- 
cgit v1.1