summaryrefslogtreecommitdiff
path: root/src/helper
diff options
context:
space:
mode:
authoroharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60>2008-10-16 13:02:36 +0000
committeroharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60>2008-10-16 13:02:36 +0000
commitba02ce97a480e5597c6018524ff815a48f9d593f (patch)
tree89ffc879c9bc6839ea7f6ade737f9294091ae6a5 /src/helper
parentbd50535b0b4f39cac230e776b28d2b4b0c79ddf2 (diff)
downloadopenocd_libswd-ba02ce97a480e5597c6018524ff815a48f9d593f.tar.gz
openocd_libswd-ba02ce97a480e5597c6018524ff815a48f9d593f.tar.bz2
openocd_libswd-ba02ce97a480e5597c6018524ff815a48f9d593f.tar.xz
openocd_libswd-ba02ce97a480e5597c6018524ff815a48f9d593f.zip
added help on production proc's
git-svn-id: svn://svn.berlios.de/openocd/trunk@1072 b42882b7-edfa-0310-969c-e2dbd0fdcd60
Diffstat (limited to 'src/helper')
-rw-r--r--src/helper/startup.tcl20
1 files changed, 20 insertions, 0 deletions
diff --git a/src/helper/startup.tcl b/src/helper/startup.tcl
index f683c924..fc70298d 100644
--- a/src/helper/startup.tcl
+++ b/src/helper/startup.tcl
@@ -277,3 +277,23 @@ proc ocd_process_reset { MODE } {
$t invoke-event reset-end
}
}
+
+
+# stubs for targets scripts that do not have production procedure
+proc production_info {} {
+ return "Imagine an explanation here..."
+}
+add_help_text production_info "Displays informationo on production procedure for target script"
+
+proc production {firmwarefile serialnumber} {
+ puts "Imagine production procedure running successfully. Programmed $firmwarefile with serial number $serialnumber"
+}
+
+add_help_text production "Runs production procedure. Throws exception if procedure failed. Prints progress messages."
+
+proc production_test {} {
+ puts "Imagine nifty test procedure having run to completion here."
+}
+add_help_text production "Runs test procedure. Throws exception if procedure failed. Prints progress messages."
+
+