added help on production proc's

git-svn-id: svn://svn.berlios.de/openocd/trunk@1072 b42882b7-edfa-0310-969c-e2dbd0fdcd60
This commit is contained in:
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."