mirror of
https://github.com/github/semantic.git
synced 2024-12-25 07:55:12 +03:00
Row’s constructor is curried.
This commit is contained in:
parent
bc57f7f871
commit
485959b135
@ -24,7 +24,7 @@ data HTML =
|
||||
split :: Diff a Info -> String -> String -> IO ByteString
|
||||
split _ _ _ = return mempty
|
||||
|
||||
data Row = Row (Maybe HTML, Maybe HTML)
|
||||
data Row = Row (Maybe HTML) (Maybe HTML)
|
||||
|
||||
straightToSplit :: Diff a Info -> String -> String -> [Row]
|
||||
straightToSplit (Free (Annotated (left, right) syntax)) = freeSyntaxToSplit (left, right) syntax
|
||||
|
Loading…
Reference in New Issue
Block a user