From 36eb0df4a98d7cf2501a456fa50f50b9a97ef889 Mon Sep 17 00:00:00 2001 From: Rob Rix Date: Mon, 7 Oct 2019 17:18:53 -0400 Subject: [PATCH] =?UTF-8?q?Don=E2=80=99t=20use=20emptySpan=20in=20the=20do?= =?UTF-8?q?ctests.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- semantic-core/src/Analysis/Concrete.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/semantic-core/src/Analysis/Concrete.hs b/semantic-core/src/Analysis/Concrete.hs index 3ef95d665..43b52ca94 100644 --- a/semantic-core/src/Analysis/Concrete.hs +++ b/semantic-core/src/Analysis/Concrete.hs @@ -67,7 +67,7 @@ data Edge = Lexical | Import -- | Concrete evaluation of a term to a value. -- --- >>> map fileBody (snd (concrete eval [File (Loc "bool" emptySpan) (Core.bool True)])) +-- >>> map fileBody (snd (concrete eval [File (Loc "bool" (Span (Pos 1 1) (Pos 1 5))) (Core.bool True)])) -- [Right (Bool True)] concrete :: (Foldable term, Show (term Name))