Skip to content

Commit ec949e2

Browse files
committed
Merge some upgrades from updating to 2.24.0 from upstream/master
1 parent 6e41a11 commit ec949e2

File tree

2 files changed

+2
-3
lines changed

2 files changed

+2
-3
lines changed

src/Iris/ProofMode/Tactics/Assumption.lean

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff 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)

src/Iris/Std/DelabRule.lean

Lines changed: 1 addition & 2 deletions
Original file line numberDiff line numberDiff 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]*)

0 commit comments

Comments
 (0)