max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

chore: use better struct literal syntax (#9731)

Browse source
This commit is contained in:
Cameron Zwarich 2025-08-05 07:07:39 -07:00 • committed by GitHub
parent 09e8079ea3
commit ed860dfa23
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/Lean/Compiler/IR/RC.lean
View file

@ -272,9 +272,8 @@ partial def visitFnBody : FnBody → Context → (FnBody × LiveVarSet)
partial def visitDecl (env : Environment) (decls : Array Decl) (d : Decl) : Decl :=
match d with
| .fdecl (xs := xs) (body := b) .. =>
let ctx : Context := { env := env, decls := decls }
let ctx := updateVarInfoWithParams ctx xs
let (b, bLiveVars) := visitFnBody b ctx
let ctx := updateVarInfoWithParams { env, decls } xs
let ⟨b, bLiveVars⟩ := visitFnBody b ctx
let b := addDecForDeadParams ctx xs b bLiveVars
d.updateBody! b
| other => other