added help on production proc's

git-svn-id: svn://svn.berlios.de/openocd/trunk@1072 b42882b7-edfa-0310-969c-e2dbd0fdcd60
__archive__
oharboe 2008-10-16 13:02:36 +00:00
parent bd50535b0b
commit ba02ce97a4
2 changed files with 21 additions and 5 deletions

View File

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

View File

@ -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