| By | ~fr33domlover |
| At | 2018-12-04 |
| Title | Replace old 'hit' dep lib package with 'git' |
| Description |
Edit file hit-harder.cabal 0 → 0
- 37 , hit
+ 37 , git
- 40 , transformers
… … … … Edit file src/Data/Git/Harder.hs 0 → 0
- 37 import Data.Git.Ref (Ref, toBinary)
+ 37 import Data.Git.Ref (Ref, SHA1, toBinary)
… … … … - 51 newtype ObjId = ObjId { unObjId :: Ref } deriving Eq+ 51 newtype ObjId = ObjId { unObjId :: Ref SHA1 } deriving Eq- 58 resolveNameMaybe :: Git -> String -> IO (Maybe ObjId)
+ 58 resolveNameMaybe :: Git SHA1 -> String -> IO (Maybe ObjId)
- 63 resolveName :: Git -> String -> IO ObjId
+ 63 resolveName :: Git SHA1 -> String -> IO ObjId
- 70 listReferences :: Git -> IO [(ObjId, String)]
+ 70 listReferences :: Git SHA1 -> IO [(ObjId, String)]
… … … … - 92 => Git
+ 92 => Git SHA1
- 94 -> ((ObjId, Commit) -> ObjId -> a -> m (a, Maybe Commit))
+ 94 -> ((ObjId, (Commit SHA1)) -> ObjId -> a -> m (a, Maybe (Commit SHA1)))
- 105 -> Maybe Commit
+ 105 -> Maybe (Commit SHA1)
… … … … - 127 => Git
+ 127 => Git SHA1
- 129 -> ((ObjId, Commit) -> ObjId -> a -> m (a, Maybe Commit))
+ 129 -> ((ObjId, (Commit SHA1)) -> ObjId -> a -> m (a, Maybe (Commit SHA1)))
- 138 -> [(ObjId, Maybe Commit)]
+ 138 -> [(ObjId, Maybe (Commit SHA1))]
… … … … - 150 getEntryObject :: Git -> ObjId -> IO (Maybe (Either Blob Tree))
+ 150 getEntryObject :: Git SHA1 -> ObjId -> IO (Maybe (Either (Blob SHA1) (Tree SHA1)))
… … … … - 162 getEntryObject_ :: Git -> ObjId -> IO (Either Blob Tree)
+ 162 getEntryObject_ :: Git SHA1 -> ObjId -> IO (Either (Blob SHA1) (Tree SHA1))
- 171 data TraversalAction = TAStop | TAContinue | TAContinueWith Tree
+ 171 data TraversalAction = TAStop | TAContinue | TAContinueWith (Tree SHA1)
- 181 => Git
+ 181 => Git SHA1
- 190 -> Tree
+ 190 -> Tree SHA1
… … … … - 212 viewTree :: Git -> Tree -> IO [(ModePerm, ObjId, EntName, Bool)]
+ 212 viewTree :: Git SHA1 -> Tree SHA1 -> IO [(ModePerm, ObjId, EntName, Bool)]
… … … … - 225 resolveTreePath :: Git -> Tree -> EntPath -> IO (Maybe (EntName, ObjId))
+ 225 resolveTreePath :: Git SHA1 -> Tree SHA1 -> EntPath -> IO (Maybe (EntName, ObjId))
… … … … Edit file src/Data/Git/Harder/Pack.hs 0 → 0
- 62 collectObjIds :: Git -> [(ObjId, Commit)] -> IO ObjIdSet
+ 62 collectObjIds :: Git SHA1-> [(ObjId, (Commit SHA1))] -> IO ObjIdSet
… … … … - 160 compressObject :: ObjectInfo -> CompressedObject
+ 160 compressObject :: ObjectInfo SHA1 -> CompressedObject
- 167 putObject :: ObjectInfo -> Put
+ 167 putObject :: ObjectInfo SHA1 -> Put
- 170 mkPutObject :: Git -> ObjId -> IO Put
+ 170 mkPutObject :: Git SHA1 -> ObjId -> IO Put
… … … … - 183 writePack :: Git -> ObjIdSet -> IO Put
+ 183 writePack :: Git SHA1 -> ObjIdSet -> IO Put
- 191 serializePack :: Git -> ObjIdSet -> IO BL.ByteString
+ 191 serializePack :: Git SHA1 -> ObjIdSet -> IO BL.ByteString
… … … … Edit file stack.yaml 0 → 0
- 6 resolver: lts-11.5
+ 6 resolver: lts-12.20
+ 15 - git-0.2.2
+ 18 - patience-0.1.1
… … … …