Skip to content

Commit 565b9b1

Browse files
committed
Make import of readMaybeLast conditional
1 parent da231c8 commit 565b9b1

File tree

1 file changed

+5
-1
lines changed

1 file changed

+5
-1
lines changed

src/Database/LSMTree/Internal/Index/OrdinaryAcc.hs

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -33,7 +33,11 @@ import Database.LSMTree.Internal.Serialise
3333
import Database.LSMTree.Internal.Vector (byteVectorFromPrim)
3434
import Database.LSMTree.Internal.Vector.Growing (GrowingVector)
3535
import qualified Database.LSMTree.Internal.Vector.Growing as Growing (append,
36-
freeze, new, readMaybeLast)
36+
freeze, new)
37+
#ifdef NO_IGNORE_ASSERTS
38+
import qualified Database.LSMTree.Internal.Vector.Growing as Growing
39+
(readMaybeLast)
40+
#endif
3741

3842
{-|
3943
A general-purpose fence pointer index under incremental construction.

0 commit comments

Comments
 (0)