fix: allow empty sequence at seq

This commit is contained in:
Leonardo de Moura 2020-02-13 11:34:09 -08:00
parent 4fe0104b52
commit cc2f84aa5d

View file

@ -37,7 +37,7 @@ def ident' : Parser := ident <|> underscore
/-
We must not use the `parser! t` macro here it because it expands into `mkAntiquot ... <|> t`,
but a tactic parser may start with an antiquotation. -/
def seq : Parser := node `Lean.Parser.Tactic.seq $ sepBy1 tacticParser "; " true
def seq : Parser := node `Lean.Parser.Tactic.seq $ sepBy tacticParser "; " true
def nonEmptySeq : Parser := node `Lean.Parser.Tactic.seq $ sepBy1 tacticParser "; " true
@[builtinTacticParser] def «intro» := parser! nonReservedSymbol "intro " >> optional ident'