File tree Expand file tree Collapse file tree 2 files changed +2
-3
lines changed
Expand file tree Collapse file tree 2 files changed +2
-3
lines changed Original file line number Diff line number Diff line change @@ -53,7 +53,7 @@ def assumptionFast {e} (hyps : Hyps bi e) : MetaM Q($e ⊢ $Q) := do
5353 hyps.removeG true fun _ _ b ty => try ? do
5454 synthInstance q(FromAssumption $b $ty $Q)
5555 | failure
56- let ( _ : Q(FromAssumption $b $ty $Q) ) := inst
56+ let _ : Q(FromAssumption $b $ty $Q) := inst
5757 have : $out =Q iprop(□?$b $ty) := ⟨⟩
5858 match fastPath with
5959 | .absorbing _ => return q(assumption (Q := $Q) $pf)
Original file line number Diff line number Diff line change @@ -22,8 +22,7 @@ macro_rules
2222 | [(name, [])] => pure name
2323 | _ => throwUnsupported
2424
25- let (p : TSyntaxArray `term) := p
26- if p.any (· matches `(`($$_))) then
25+ if p.any fun t : TSyntax _ ↦ t matches `(`($$_)) then
2726 `(@ [app_unexpander $(mkIdent f)]
2827 def unexpand : Lean.PrettyPrinter.Unexpander
2928 $[| $p => $s]*)
You can’t perform that action at this time.
0 commit comments