fix: preprocessLCtx (#12081)
This PR fixes a bug in the `Sym.preprocessLCtx` function.
This commit is contained in:
parent
94e8fd4845
commit
8258cfe2a1
1 changed files with 1 additions and 0 deletions
|
|
@ -74,6 +74,7 @@ def preprocessLCtx (lctx : LocalContext) : SymM LocalContext := do
|
|||
let type ← preprocessExpr type
|
||||
let value ← preprocessExpr value
|
||||
pure <| LocalDecl.ldecl index fvarId userName type value nondep kind
|
||||
index := index + 1
|
||||
decls := decls.push (some decl)
|
||||
fvarIdToDecl := fvarIdToDecl.insert decl.fvarId decl
|
||||
return { fvarIdToDecl, decls, auxDeclToFullName }
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue