added help on production proc's

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

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."
+
+

src/target/target/zy1000.cfg

@@ -51,11 +51,7 @@ jtag_khz 16000
 
 
 proc production_info {} {
-	return "Serial number is official MAC number"
+	return "Serial number is official MAC number. Format XXXXXXXXXXXX"
-}
-
-proc production_help {} {
-	return "Serial number is MAC number. Format XXXXXXXXXXXXXX"
 }
 
 # There is no return value from this procedure. If it is