Creates an exporter that prints trace summaries to the console.
Examples
exp <- console_exporter(verbose = TRUE)
tr <- Trace$new("demo-run")
tr$start()
span <- Span$new("step1", type = "custom")
span$start()
span$end()
tr$add_span(span)
tr$end()
export_trace(exp, tr)
#> --- Trace: demo-run ---
#> Status: completed
#> Duration: 0.00s
#> Spans: 1
#> -- Spans --
#> * step1 [custom] (ok) - 0.000s