diff options
Diffstat (limited to 'src/Language/Fiddle/Parser.hs')
| -rw-r--r-- | src/Language/Fiddle/Parser.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Language/Fiddle/Parser.hs b/src/Language/Fiddle/Parser.hs index b3ed09a..d41cc64 100644 --- a/src/Language/Fiddle/Parser.hs +++ b/src/Language/Fiddle/Parser.hs @@ -59,7 +59,7 @@ directedP subparser = withMeta $ do directiveP :: PaS Directive directiveP = withMeta $ - Directive <$> defer directiveBodyTokens directiveBodyP + Directive <$> defer directiveBodyTokens directiveBodyP directiveBodyP :: PaS DirectiveBody directiveBodyP = withMeta $ do @@ -122,10 +122,10 @@ importListP = withMeta $ do <$> many (ident <* (tok TokComma <|> lookAhead (tok TokRParen))) <* tok TokRParen -importStatementP :: PaS ImportStatement +importStatementP :: Pa ImportStatement importStatementP = withMeta $ - ImportStatement <$> stringTokenP <*> optionMaybe importListP + ImportStatement <$> stringTokenP <*> optionMaybe importListP <*> pure () fiddleDeclP :: Pa FiddleDecl fiddleDeclP = do |