diff options
author | 2023-10-10 14:33:42 +0000 | |
---|---|---|
committer | 2023-10-10 14:33:42 +0000 | |
commit | af1a266670d040d2f4083ff309d732d648afba2a (patch) | |
tree | 2fc46203448ddcc6f81546d379abfaeb323575e9 /roms/skiboot/external/mambo/qtrace_utils.tcl | |
parent | e02cda008591317b1625707ff8e115a4841aa889 (diff) |
Change-Id: Iaf8d18082d3991dec7c0ebbea540f092188eb4ec
Diffstat (limited to 'roms/skiboot/external/mambo/qtrace_utils.tcl')
-rw-r--r-- | roms/skiboot/external/mambo/qtrace_utils.tcl | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/roms/skiboot/external/mambo/qtrace_utils.tcl b/roms/skiboot/external/mambo/qtrace_utils.tcl new file mode 100644 index 000000000..bb20b31d3 --- /dev/null +++ b/roms/skiboot/external/mambo/qtrace_utils.tcl @@ -0,0 +1,16 @@ +# SPDX-License-Identifier: Apache-2.0 OR GPL-2.0-or-later + +if { [file exists $env(LIB_DIR)/perf/qtrace.tcl] == 1} { + if { [catch {source $env(LIB_DIR)/perf/qtrace.tcl} issue ] } { + puts "QTrace not available: $issue" + } + + proc start_qtrace { { qtfile qtrace.qt } } { + QTrace::Initialize p9 mysim + QTrace::Start $qtfile mysim + } + + proc stop_qtrace { } { + QTrace::Stop mysim + } +} |