added help on production proc's

git-svn-id: svn://svn.berlios.de/openocd/trunk@1072 b42882b7-edfa-0310-969c-e2dbd0fdcd60

diff --git a/src/helper/startup.tcl b/src/helper/startup.tcl
index f683c9246fb39eb49d17ea7fbfd5baffa866f324..fc70298da1a66edd19a92a446fd29e0576327932 100644 (file)
--- 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."
+
+

diff --git a/src/target/target/zy1000.cfg b/src/target/target/zy1000.cfg
index 00c577de35a5118ad40d4f85c49f8dddda52e4a2..b1c6034da7d7b9e6ea24233fedbbbb19c8775961 100644 (file)
--- a/src/target/target/zy1000.cfg
+++ b/src/target/target/zy1000.cfg
@@ -51,11 +51,7 @@ jtag_khz 16000
 
 
 proc production_info {} {
-       return "Serial number is official MAC number"
-}
-
-proc production_help {} {
-       return "Serial number is MAC number. Format XXXXXXXXXXXXXX"
+       return "Serial number is official MAC number. Format XXXXXXXXXXXX"
 }
 
 # There is no return value from this procedure. If it is