diff options
| author | Marvin Borner | 2024-10-27 18:45:21 +0100 |
|---|---|---|
| committer | Marvin Borner | 2024-10-27 18:45:21 +0100 |
| commit | fe1fe57f358472561041cde12a48d28b8bd247a9 (patch) | |
| tree | 53162ad90b27ff93ba8abe17c08c1a92d7b6faf1 /src/Parser.hs | |
| parent | c6e39268be197a4eaccc0187271764a646017715 (diff) | |
Improvements in maps, sets, and parsing
Diffstat (limited to 'src/Parser.hs')
| -rw-r--r-- | src/Parser.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Parser.hs b/src/Parser.hs index 83f03aa..01dda6e 100644 --- a/src/Parser.hs +++ b/src/Parser.hs @@ -426,7 +426,7 @@ parseCommandBlock = do parseDefBlock :: Int -> Parser Instruction parseDefBlock lvl = - sepEndBy parseComment newline *> string (replicate lvl '\t') *> try + sepEndBy (try parseComment) newline *> string (replicate lvl '\t') *> try (parseDefine lvl) parseBlock :: Int -> Parser Instruction |