From 7dc4913d5ab2a0962a30c28cd87f30e878e0ea3f Mon Sep 17 00:00:00 2001
From: martinsumner <martin.sumner@adaptip.co.uk>
Date: Mon, 20 Mar 2017 22:43:22 +0000
Subject: [PATCH] ETS - delete table not objects

Try and delete the table not just the objects in the table - will this
improve memory leak?
---
 src/leveled_bookie.erl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/leveled_bookie.erl b/src/leveled_bookie.erl
index b450bcc..055cfa9 100644
--- a/src/leveled_bookie.erl
+++ b/src/leveled_bookie.erl
@@ -1188,8 +1188,9 @@ maybepush_ledgercache(MaxCacheSize, Cache, Penciller) ->
             case leveled_penciller:pcl_pushmem(Penciller, CacheToLoad) of
                 ok ->
                     Cache0 = #ledger_cache{},
-                    true = ets:delete_all_objects(Tab),
-                    {ok, Cache0#ledger_cache{mem=Tab}};
+                    true = ets:delete(Tab),
+                    NewTab = ets:new(mem, [ordered_set]),
+                    {ok, Cache0#ledger_cache{mem=NewTab}};
                 returned ->
                     {returned, Cache}
             end;