diff options
| -rw-r--r-- | src/Parser.hs | 1 | ||||
| -rw-r--r-- | test/asset/parser/tags.et | 10 |
2 files changed, 11 insertions, 0 deletions
diff --git a/src/Parser.hs b/src/Parser.hs index 5ad1b1a..ed03f3f 100644 --- a/src/Parser.hs +++ b/src/Parser.hs @@ -62,6 +62,7 @@ parseTestDefinition = label "test definition" $ toplevel ToplevelTest $ do void $ L.indentGuard scn EQ ref off <- stateOffset <$> getParserState name <- try $ identifier <* osymbol ":" + <* ((eol >> mzero) <|> return ()) -- continue only if not on EOL case name of "tag" -> do Just <$> typedExpr FunctionTerm <* eol <* scn diff --git a/test/asset/parser/tags.et b/test/asset/parser/tags.et index 178295f..3e06e44 100644 --- a/test/asset/parser/tags.et +++ b/test/asset/parser/tags.et @@ -8,3 +8,13 @@ test First: let x = 1 local: let y = 1 + +test Second: + tag: SomeTag + + local: + let x = 1 + +test Third: + local: + let x = 1 |