lean4-htt/tests/lean/run/parserQuot.lean
2022-07-21 23:49:57 +02:00

6 lines
249 B
Text

syntax blockingConsts := "blocking" "[" ident,* "]"
macro "specialize_def" i:ident "[" ts:term,* "]" block:blockingConsts : tactic => do
/- expected 'blocking' -/
if let `(blockingConsts|blocking [ $is:ident,* ]) := block then
sorry
sorry