summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/jtag/startup.tcl9
1 files changed, 9 insertions, 0 deletions
diff --git a/src/jtag/startup.tcl b/src/jtag/startup.tcl
index 496fdc82..fdd30781 100644
--- a/src/jtag/startup.tcl
+++ b/src/jtag/startup.tcl
@@ -76,6 +76,15 @@ proc srst_asserted {} {
puts "Sensed nSRST asserted."
}
+# measure actual JTAG clock
+proc measure_clk {} {
+ set start_time [ms];
+ runtest 10000000;
+ echo "Running at more than [expr 10000.0 / ([ms]-$start_time)] kHz";
+}
+
+add_help_text measure_clk "Runs a test to measure the JTAG clk. Useful with RCLK / RTCK."
+
# BEGIN MIGRATION AIDS ... these adapter operations originally had
# JTAG-specific names despite the fact that the operations were not
# specific to JTAG, or otherewise had troublesome/misleading names.