From beda8ded7c96c591fdebbbd2cf197a02f8f87d0c Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Roman=20Smr=C5=BE?= Date: Mon, 24 Feb 2025 22:27:20 +0100 Subject: Fix parsing of a module starting with whitespace or comment --- src/Parser.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/src/Parser.hs b/src/Parser.hs index 94e9a12..1d1d540 100644 --- a/src/Parser.hs +++ b/src/Parser.hs @@ -119,6 +119,7 @@ parseImport = label "import declaration" $ toplevel (\() -> []) $ do parseTestModule :: FilePath -> TestParser Module parseTestModule absPath = do + scn moduleName <- choice [ label "module declaration" $ do wsymbol "module" -- cgit v1.2.3