feat: add intro + funMatchAlts syntax

This commit is contained in:
Leonardo de Moura 2020-09-04 16:32:53 -07:00
parent ef64e1c25a
commit a88b2be72a

View file

@ -26,6 +26,7 @@ fun c s =>
def ident' : Parser := ident <|> underscore
@[builtinTacticParser] def «intro» := parser! nonReservedSymbol "intro " >> many (termParser maxPrec)
@[builtinTacticParser] def «introMatch» := parser! nonReservedSymbol "intro " >> Term.funMatchAlts
@[builtinTacticParser] def «intros» := parser! nonReservedSymbol "intros " >> many ident'
@[builtinTacticParser] def «revert» := parser! nonReservedSymbol "revert " >> many1 ident
@[builtinTacticParser] def «clear» := parser! nonReservedSymbol "clear " >> many1 ident