lean4-htt/tests/lean/run/2058.lean
Leonardo de Moura 2652cc18b8
chore: error messages consistency (#10143)
This PR standardizes error messages by quoting names with backticks. The
changes were automated, so some cases may still be missing.
2025-08-26 17:55:43 +00:00

87 lines
1.8 KiB
Text
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/-!
# Localized error messages with unassigned metavariables
-/
set_option pp.mvars false
/-!
Test: now reports "don't know how to synthesize implicit argument" rather than an error on the `example` command.
-/
/--
error: don't know how to synthesize implicit argument `α`
@none ?_
context:
⊢ Type _
---
error: failed to infer `let` declaration type
-/
#guard_msgs in
example : IO Unit := do
let x := none
pure ()
/-!
Test: now reports that the universe levels are not assigned at the 'let' rather than an error on the `example` command.
-/
/--
error: failed to infer universe levels in `let` declaration type
PUnit.{_}
-/
#guard_msgs in
def foo : IO Unit := do
let x : PUnit := PUnit.unit
pure ()
-- specializes to 0 on error
/--
info: def foo : IO Unit :=
have x := PUnit.unit.{0};
pure.{0, 0} Unit.unit
-/
#guard_msgs in set_option pp.universes true in #print foo
/-!
Test: Works for `have` too.
-/
/--
error: failed to infer universe levels in `have` declaration type
PUnit.{_}
-/
#guard_msgs in
def foo' : IO Unit := do
have x : PUnit := PUnit.unit
pure ()
/-!
Test: Works for `fun` binders.
-/
/--
error: Failed to infer universe levels in type of binder `x`
PUnit.{_}
-/
#guard_msgs in
example : Nat := (fun x : PUnit => 2) PUnit.unit
/-!
Test: A failure not in a binder, right now reports an error on `example`.
A change is that before the error was about level parameters rather than metavariables since
the def elaborator would turn all metavariables into parameters before this analysis.
-/
/--
error: declaration `_example` contains universe level metavariables at the expression
Function.const ({α : Sort _} → αα) 2 @id.{_}
in the declaration body
Function.const ({α : Sort _} → αα) 2 @id.{_}
-/
#guard_msgs in
example : Nat := Function.const _ 2 @id