attoparsec parsers for all new-format uuid-based logs
There should be some speed gains here, especially for chunk and remote state logs, which are queried once per key. Now only old-format uuid-based logs still need to be converted to attoparsec.
This commit is contained in:
parent
7e54c215b4
commit
66603d6f75
10 changed files with 88 additions and 56 deletions
|
@ -42,10 +42,10 @@ scheduleSet NoUUID _ = error "unknown UUID; cannot modify"
|
|||
|
||||
scheduleMap :: Annex (M.Map UUID [ScheduledActivity])
|
||||
scheduleMap = simpleMap
|
||||
. parseLogWithUUID parser . decodeBL
|
||||
. parseLog parser . decodeBL
|
||||
<$> Annex.Branch.get scheduleLog
|
||||
where
|
||||
parser _uuid = eitherToMaybe . parseScheduledActivities
|
||||
parser = eitherToMaybe . parseScheduledActivities
|
||||
|
||||
scheduleGet :: UUID -> Annex (S.Set ScheduledActivity)
|
||||
scheduleGet u = do
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue