1
1
mirror of https://github.com/github/semantic.git synced 2024-12-29 18:06:14 +03:00

Revert "Add a convenience to construct Source Char."

This reverts commit 63e023e439491207aa739bb0e68660770eaa9272.
This commit is contained in:
Rob Rix 2016-03-21 19:08:35 -04:00
parent 7ff808f3dc
commit 2226acf61c

View File

@ -95,8 +95,5 @@ spec = parallel $ do
leaf :: annotation -> String -> Free (Annotated String annotation) patch
leaf info = Free . Annotated info . Leaf
source :: String -> Source Char
source = Source.fromList
info :: Int -> Int -> Info
info = ((`Info` mempty) .) . Range