voidlizard
/
hbs2
mirror of https://github.com/voidlizard/hbs2
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

wip

This commit is contained in:
voidlizard 2025-01-12 12:52:14 +03:00
parent cb307a4ca6
commit 0d4fbcc368
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hbs2-git3/lib/HBS2/Git3/State/Index.hs
View File

@ -97,6 +97,8 @@ mergeSortedFilesN :: forall m . MonadUnliftIO m
mergeSortedFilesN _ [] out = rm out mergeSortedFilesN _ [] out = rm out
mergeSortedFilesN _ [_] out = rm out
mergeSortedFilesN getKey inputFiles outFile = do mergeSortedFilesN getKey inputFiles outFile = do
mmaped <- for inputFiles $ \fn -> do mmaped <- for inputFiles $ \fn -> do