fix: spacing

IntersectMBO · Jan 2, 2025 · c10eac4 · c10eac4
1 parent 4669625
commit c10eac4
Showing 1 changed file with 7 additions and 7 deletions.
diff --git a/test/Test/Database/LSMTree/Internal/Run.hs b/test/Test/Database/LSMTree/Internal/Run.hs
@@ -309,13 +309,13 @@ withRunDataAsWriteBuffer hfs f fsPaths rd action = do
 
 -- | Serialise a 'WriteBuffer' and 'WriteBufferBlobs' to disk and perform an 'IO' action.
 withSerialisedWriteBuffer ::
-       FS.HasFS IO h
-    -> FS.HasBlockIO IO h
-    -> WriteBufferFsPaths
-    -> WriteBuffer
-    -> Ref (WriteBufferBlobs IO h)
-    -> IO a
-    -> IO a
+     FS.HasFS IO h
+  -> FS.HasBlockIO IO h
+  -> WriteBufferFsPaths
+  -> WriteBuffer
+  -> Ref (WriteBufferBlobs IO h)
+  -> IO a
+  -> IO a
 withSerialisedWriteBuffer hfs hbio wbPaths wb wbb =
   bracket_ (writeWriteBuffer hfs hbio wbPaths wb wbb) $ do
     for_ [ Paths.writeBufferKOpsPath wbPaths