mirror of
https://github.com/leanprover/lean4.git
synced 2026-03-17 18:34:06 +00:00
a3cb39eac9
This PR migrates most remaining tests to the new test suite. It also completes the migration of directories like `tests/lean/run`, meaning that PRs trying to add tests to those old directories will now fail.
24 lines
694 B
Lean4
24 lines
694 B
Lean4
import Lean.Meta.Basic
|
|
|
|
open Lean.Meta
|
|
|
|
def traceIt : MetaM Unit := do
|
|
Lean.withTraceNode `Meta.debug (fun _ => return m!"root") do
|
|
Lean.withTraceNode `Meta.debug (fun _ => return m!"child1") do
|
|
trace[Meta.debug] "child11"
|
|
trace[Meta.debug] "child12"
|
|
trace[Meta.debug] "child13"
|
|
Lean.withTraceNode `Meta.debug (fun _ => return m!"child2") do
|
|
trace[Meta.debug] "child21"
|
|
trace[Meta.debug] "child22"
|
|
Lean.withTraceNode `Meta.debug (fun _ => return m!"child3") do
|
|
trace[Meta.debug] "child31"
|
|
trace[Meta.debug] "child4"
|
|
|
|
set_option trace.Meta.debug true
|
|
|
|
#eval traceIt
|
|
|
|
--^ collectDiagnostics
|
|
--^ interactiveDiagnostics:highlightMatches:child1
|