feat: add antiquotation for indentedNonEmptySeq

This commit is contained in:
Leonardo de Moura 2020-09-14 14:51:20 -07:00
parent 05e6a779ba
commit c49ccda46a

View file

@ -20,7 +20,7 @@ registerBuiltinDynamicParserAttribute `tacticParser `tactic
categoryParser `tactic rbp
def Tactic.indentedNonEmptySeq : Parser :=
node `Lean.Parser.Tactic.seq $ withPosition fun pos =>
nodeWithAntiquot "tacticSeq" `Lean.Parser.Tactic.seq $ withPosition fun pos =>
sepBy1 tacticParser (try ("; " >> checkColGe pos.column "tatic must be indented"))
def darrow : Parser := " => "