lean4-htt/tests/lean/run/zetaDeltaFalseDefEqIssue.lean
Leonardo de Moura 1f32477385
fix: isDefEq when zetaDelta := false (#6129)
This PR fixes a bug at `isDefEq` when `zetaDelta := false`. See new test
for a small example that exposes the issue.
2024-11-19 21:22:02 +00:00

14 lines
351 B
Text

import Lean
/--
info: true
true
-/
#guard_msgs in
open Lean Meta in
run_meta do
withLetDecl `x (mkConst ``Nat) (mkNatLit 10) fun x => do
IO.println (← isDefEq x x)
withConfig (fun c => { c with zeta := false, zetaDelta := false }) do
IO.println (← isDefEq x x) -- Should return `true` even if `zetaDelta := false`
return ()