Parse comments at beginning of file correctly

This commit is contained in:
Joscha 2019-11-10 14:34:29 +00:00
parent 5e9c50d618
commit 143a3e9a45

View file

@ -103,7 +103,8 @@ stateFromRegisters reg mem =
parseState :: Parser (MimaState, Map.Map T.Text MimaAddress)
parseState = do
space
lexeme $ pure ()
void $ many newlines
unresolvedRegisters <- parseRegisters
(labels, unresolvedRawInstructions) <- parseInstructions
registers <- resolveRegisters labels unresolvedRegisters