lean4-htt/tests/server_interactive/interactiveTraces.lean
Garmelon a3cb39eac9
chore: migrate more tests to new test suite (#12809)
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.
2026-03-06 16:52:01 +00:00

23 lines
683 B
Text

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:expandTraces