lean4-htt/tests/lean/1606.lean
2022-09-19 12:44:43 -07:00

22 lines
551 B
Text

example : True := by
skip
skip --< should complain about misleading indentation
trivial
macro "frobnicate" : tactic => `(tactic| skip)
example : True := by
conv =>
skip
frobnicate --< should not parse frobnicate as a tactic
trivial
-- check error message without default handler for conv tactics
declare_syntax_cat item
syntax "valid_item" : item
macro "block" "=>" sepByIndentSemicolon(item) : tactic => `(tactic| skip)
example : True := by
block =>
valid_item
frobnicate --< should not parse frobnicate as a tactic