From ca3ba1c121b1ea70f82b09f0aa548167b8ccfe81 Mon Sep 17 00:00:00 2001 From: spaced4ndy <8711996+spaced4ndy@users.noreply.github.com> Date: Thu, 21 Dec 2023 14:45:33 +0400 Subject: [PATCH] add tests --- tests/ByteStringBatcherTests.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/tests/ByteStringBatcherTests.hs b/tests/ByteStringBatcherTests.hs index b2c05ebb95..767591a2a5 100644 --- a/tests/ByteStringBatcherTests.hs +++ b/tests/ByteStringBatcherTests.hs @@ -11,6 +11,8 @@ import Test.Hspec byteStringBatcherTests :: Spec byteStringBatcherTests = describe "ByteStringBatcher tests" $ do + runBatcherTest 8 ["a"] [] ["a"] + runBatcherTest 8 ["a","b"] [] ["[a,b]"] runBatcherTest 8 ["a", "b", "c"] [] ["[a,b,c]"] runBatcherTest 8 ["a", "bb", "c"] [] ["[a,bb,c]"] runBatcherTest 8 ["a", "b", "c", "d"] [] ["[a,b,c]","d"]