From dde37566b9b33ab48594fb06e848015cbc4fe5c9 Mon Sep 17 00:00:00 2001
From: martinsumner <martin.sumner@adaptip.co.uk>
Date: Wed, 15 Mar 2017 16:40:43 +0000
Subject: [PATCH] Add unit test for more than one slot

---
 src/leveled_sst.erl | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/src/leveled_sst.erl b/src/leveled_sst.erl
index e73b00d..f76ac54 100644
--- a/src/leveled_sst.erl
+++ b/src/leveled_sst.erl
@@ -1703,11 +1703,14 @@ additional_range_test() ->
                                     2 * ?NOLOOK_SLOTSIZE + Gap + 1),
     R4 = sst_getkvrange(P1, element(1, GapSKV), element(1, PastEKV), 2),
     ?assertMatch(IK2, R4),
+    R5 = sst_getkvrange(P1, SK, element(1, PastEKV), 2),
+    IKAll = IK1 ++ IK2,
+    ?assertMatch(IKAll, R5),
     
     % Testing at a slot end
     Slot1EK = element(1, lists:last(IK1)),
-    R5 = sst_getkvrange(P1, SK, Slot1EK, 2),
-    ?assertMatch(IK1, R5).
+    R6 = sst_getkvrange(P1, SK, Slot1EK, 2),
+    ?assertMatch(IK1, R6).