mirror of
https://github.com/github/semantic.git
synced 2024-12-25 07:55:12 +03:00
PrettyDiff carries the Source.
This commit is contained in:
parent
564dd1d2c7
commit
43359cad9c
@ -103,4 +103,4 @@ leaf info = Free . Annotated info . Leaf
|
||||
info :: Int -> Int -> Info
|
||||
info = ((\ r -> Info r mempty 0) .) . Range
|
||||
|
||||
newtype PrettyDiff = PrettyDiff { unPrettyDiff :: Join These [SplitDiff String Info] }
|
||||
data PrettyDiff = PrettyDiff { unPrettySource :: Source.Source Char, unPrettyDiff :: [Join These (SplitDiff String Info)] }
|
||||
|
Loading…
Reference in New Issue
Block a user