1
1
mirror of https://github.com/github/semantic.git synced 2025-01-01 19:55:34 +03:00

Moved isBranchInfo to DiffSummary

This commit is contained in:
joshvera 2016-08-24 15:28:10 -04:00
parent e58438f4d9
commit 17da45b320

View File

@ -90,10 +90,5 @@ isIndexedOrFixed' syntax = case syntax of
(Fixed _) -> True
_ -> False
isBranchInfo :: DiffInfo -> Bool
isBranchInfo info = case info of
(BranchInfo _ _ _) -> True
_ -> False
isBranchNode :: Patch DiffInfo -> Bool
isBranchNode = any isBranchInfo