diff options
author | Roman Smrž <roman.smrz@seznam.cz> | 2022-07-15 20:12:09 +0200 |
---|---|---|
committer | Roman Smrž <roman.smrz@seznam.cz> | 2022-07-15 20:12:09 +0200 |
commit | 3c05d0cbd310af1c34d3731a15feb2a9508aded2 (patch) | |
tree | 8d77f0efbe61a569fc7ea3e685107cc20768aa27 /src/Storage/Internal.hs | |
parent | b8e55c64a68763b0953945476cc75206f5354023 (diff) |
Stored roots with caching
Diffstat (limited to 'src/Storage/Internal.hs')
-rw-r--r-- | src/Storage/Internal.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/Storage/Internal.hs b/src/Storage/Internal.hs index 3a53567..1f093b0 100644 --- a/src/Storage/Internal.hs +++ b/src/Storage/Internal.hs @@ -45,6 +45,7 @@ data Storage' c = Storage { stBacking :: StorageBacking c , stParent :: Maybe (Storage' Identity) , stRefGeneration :: MVar (HT.BasicHashTable RefDigest Generation) + , stRefRoots :: MVar (HT.BasicHashTable RefDigest [RefDigest]) } instance Eq (Storage' c) where |