Remove spurious undefined
This commit is contained in:
parent
bde92704f1
commit
393b253d28
1 changed files with 1 additions and 1 deletions
|
|
@ -53,7 +53,7 @@ lFlags :: Parser (Set.Set Char)
|
|||
lFlags = Set.unions <$> some (lexeme flag)
|
||||
|
||||
lDirective :: Parser (Directive Address)
|
||||
lDirective = label "assembler directive" $ undefined
|
||||
lDirective = label "assembler directive" $
|
||||
DReg <$> directive ".reg" lSetRegister
|
||||
<|> DOrg <$> directive ".org" (lexeme largeValue)
|
||||
<|> DLit <$> directive ".lit" (lexeme word)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue