Permalink
Browse files

idx: add dump of CRC to idxDump

  • Loading branch information...
1 parent 0fc0198 commit f24980e763ed6412068cd21ed3ef5032b640aefa @kfish committed May 10, 2011
Showing with 2 additions and 1 deletion.
  1. +2 −1 Git/PackIndex.hs
View
3 Git/PackIndex.hs
@@ -108,7 +108,8 @@ dumpIdx' idx = do
o <- fromIntegral <$> idxOffset idx i
let o' = printf "0x%04x" (o :: Int)
s <- idxSha1 idx i
- putStrLn $ show i ++ ": " ++ o' ++ " SHA: " ++ showDigestBS s
+ c <- maybe "" ((" CRC: " ++) . show) <$> idxCRC idx i
+ putStrLn $ show i ++ ": " ++ o' ++ " SHA: " ++ showDigestBS s ++ c
------------------------------------------------------------

0 comments on commit f24980e

Please sign in to comment.