refactor(journal): remove use of slice

platonic-io · Feb 14, 2022 · f5fa91b · f5fa91b
1 parent 412a9b7
commit f5fa91b
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/journal/test/JournalTest.hs b/src/journal/test/JournalTest.hs
@@ -114,13 +114,13 @@ appendBSFake bs fj@(FakeJournal bss ix termCount) =
     readBytes :: Int
     readBytes = Vector.sum
               . Vector.map (\bs -> align (hEADER_LENGTH + BS.length bs) fRAME_ALIGNMENT)
-              . Vector.slice 0 (max 0 (ix - 1))
+              . Vector.take (ix - 1)
               $ bss
 
     unreadBytes :: Int
     unreadBytes = Vector.sum
                 . Vector.map (\bs -> align (hEADER_LENGTH + BS.length bs) fRAME_ALIGNMENT)
-                . Vector.slice ix (max 0 (Vector.length bss - 1 - ix))
+                . Vector.drop ix
                 $ bss
 
 readJournalFake :: FakeJournal -> (FakeJournal, Maybe ByteString)