From 9e0e56479e94f2a0e17da70bd241ccd21ef50e78 Mon Sep 17 00:00:00 2001 From: Timothy Clem <timothy.clem@gmail.com> Date: Tue, 21 Aug 2018 13:16:49 -0700 Subject: [PATCH] Handle comments with trailing seps --- src/Data/Syntax.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Data/Syntax.hs b/src/Data/Syntax.hs index 53ab460d4..e830c3656 100644 --- a/src/Data/Syntax.hs +++ b/src/Data/Syntax.hs @@ -307,4 +307,4 @@ instance Evaluatable Context where eval Context{..} = subtermRef contextSubject instance Tokenize Context where - tokenize Context{..} = sequenceA_ contextTerms *> contextSubject + tokenize Context{..} = sequenceA_ (sepTrailing contextTerms) *> contextSubject