Introduced jtag_init and "jtag arp_init" to allow target scripts more control over...

[openocd.git] / src / helper / startup.tcl

diff --git a/src/helper/startup.tcl b/src/helper/startup.tcl
index 7225929fb46922354cf407e0b524f51daf8130d5..229aa066f23026a81414ff678b2edc6bca73e204 100644 (file)
--- a/src/helper/startup.tcl
+++ b/src/helper/startup.tcl
@@ -359,3 +359,13 @@ proc capture_catch {a} {
        } result
        return $result
 }
        } result
        return $result
 }

+
+
+# Executed during "init". Can be implemented by target script 
+# tar
+proc jtag_init {} {
+       if {[catch {jtag arp_init} err]!=0} {
+               # try resetting additionally
+               jtag arp_init-reset
+       }
+}
\ No newline at end of file