hashed-storage 0.3.7 → 0.3.8

raw patch · 4 files changed

+4/−4 lines, 4 filesbinary-addedPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

Storage/Hashed/Index.hs +1/−1
Storage/Hashed/Tree.hs +1/−1
hashed-storage.cabal +2/−2
testdata.zip binary

Storage/Hashed/Index.hs view

@@ -121,7 +121,7 @@         (namefp, nameoff, namel) = toForeignPtr name     withForeignPtr fp $ \p ->         withForeignPtr namefp $ \namep ->-            do pokeByteOff p off namel+            do pokeByteOff p off (xlate32 $ fromIntegral namel :: Int32)                memcpy (plusPtr p $ off + 4)                       (plusPtr namep nameoff)                       (fromIntegral namel)

Storage/Hashed/Tree.hs view

@@ -271,7 +271,7 @@             if treeHash left `match` treeHash right                then return (emptyTree, emptyTree)                else diff left right-  where match (Just h) (Just j) | h == j = True+  where match (Just (Hash (_, h))) (Just (Hash (_, j))) | h == j = True         match _ _ = False         isFile (File _) = True         isFile _ = False

hashed-storage.cabal view

@@ -1,5 +1,5 @@ name:          hashed-storage-version:       0.3.7+version:       0.3.8 synopsis:      Hashed file storage support code.  description:   Support code for reading and manipulating hashed file storage@@ -19,7 +19,7 @@ category:      System build-type:    Custom cabal-version: >= 1.6-extra-source-files: Bundled/sha2.h+extra-source-files: Bundled/sha2.h, testdata.zip  flag test     default: False

+ testdata.zip view

binary file changed (absent → 16669 bytes)