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

Correct the doctest.

This commit is contained in:
Rob Rix 2019-10-11 12:19:37 -04:00
parent 7554271e2d
commit 7c2ac87ff3
No known key found for this signature in database
GPG Key ID: F188A01508EA1CF7

View File

@ -67,7 +67,7 @@ data Edge = Lexical | Import
-- | Concrete evaluation of a term to a value. -- | Concrete evaluation of a term to a value.
-- --
-- >>> map fileBody (snd (concrete eval [File (Path.AbsRelFile "bool") (Span (Pos 1 1) (Pos 1 5)) (Core.bool True)])) -- >>> map fileBody (snd (concrete eval [File (Path.absRel "bool") (Span (Pos 1 1) (Pos 1 5)) (Core.bool True)]))
-- [Right (Bool True)] -- [Right (Bool True)]
concrete concrete
:: (Foldable term, Show (term Name)) :: (Foldable term, Show (term Name))