From 52c0037c4f0a93ec87fe6e46ef776580090db624 Mon Sep 17 00:00:00 2001
From: oharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60>
Date: Mon, 25 Aug 2008 13:18:55 +0000
Subject: STR912 uses RCLK if available

git-svn-id: svn://svn.berlios.de/openocd/trunk@967 b42882b7-edfa-0310-969c-e2dbd0fdcd60
---
 src/helper/startup.tcl | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

(limited to 'src/helper')

diff --git a/src/helper/startup.tcl b/src/helper/startup.tcl
index e60ad976..1b5c06e2 100644
--- a/src/helper/startup.tcl
+++ b/src/helper/startup.tcl
@@ -160,4 +160,14 @@ proc ocd_gdb_restart {target_num} {
 	# Fix!!! we're resetting all targets here! Really we should reset only
 	# one target
 	reset halt
-}
\ No newline at end of file
+}
+
+
+# If RCLK is not supported, use fallback_speed_khz
+proc jtag_rclk {fallback_speed_khz} {
+	if {[catch {jtag_khz 0}]!=0} {
+		jtag_khz $fallback_speed_khz
+	}
+}
+
+add_help_text jtag_rclk "fallback_speed_khz - set JTAG speed to RCLK or use fallback speed"
\ No newline at end of file
-- 
cgit v1.2.3