Parse comments at beginning of file correctly
This commit is contained in:
parent
5e9c50d618
commit
143a3e9a45
1 changed files with 2 additions and 1 deletions
|
|
@ -103,7 +103,8 @@ stateFromRegisters reg mem =
|
||||||
|
|
||||||
parseState :: Parser (MimaState, Map.Map T.Text MimaAddress)
|
parseState :: Parser (MimaState, Map.Map T.Text MimaAddress)
|
||||||
parseState = do
|
parseState = do
|
||||||
space
|
lexeme $ pure ()
|
||||||
|
void $ many newlines
|
||||||
unresolvedRegisters <- parseRegisters
|
unresolvedRegisters <- parseRegisters
|
||||||
(labels, unresolvedRawInstructions) <- parseInstructions
|
(labels, unresolvedRawInstructions) <- parseInstructions
|
||||||
registers <- resolveRegisters labels unresolvedRegisters
|
registers <- resolveRegisters labels unresolvedRegisters
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue