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

chore: remove bogus registerSimproc

Browse source
This commit is contained in:
Leonardo de Moura 2023-12-30 16:15:05 -08:00 • committed by Sebastian Ullrich
parent 7564b204ec
commit 188ff2dd20
1 changed files with 0 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
src/Lean/Elab/Tactic/Simproc.lean
View file

@ -46,7 +46,6 @@ namespace Command
liftTermElabM do
checkSimprocType declName
let keys ← elabSimprocKeys pattern
registerSimproc declName keys
let val := mkAppN (mkConst ``registerBuiltinSimproc) #[toExpr declName, toExpr keys]
let initDeclName ← mkFreshUserName (declName ++ `declare)
declareBuiltin initDeclName val