diff options
author | oharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60> | 2008-07-12 07:50:17 +0000 |
---|---|---|
committer | oharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60> | 2008-07-12 07:50:17 +0000 |
commit | cebfbfa661b4e53cabf23bbb32c227e0b1962c77 (patch) | |
tree | ec15a68cd9587bbf80ad421eed5d6ba6d8886a1f /src/startup.tcl | |
parent | a65255a06d7252614f0061823860568f4aefe1b7 (diff) |
testing/*.tcl sample & test code
git-svn-id: svn://svn.berlios.de/openocd/trunk@799 b42882b7-edfa-0310-969c-e2dbd0fdcd60
Diffstat (limited to 'src/startup.tcl')
-rw-r--r-- | src/startup.tcl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/startup.tcl b/src/startup.tcl index 294dee28..dc3a0895 100644 --- a/src/startup.tcl +++ b/src/startup.tcl @@ -19,6 +19,11 @@ proc add_help_text {cmd cmd_help} { lappend ocd_helptext [list $cmd $cmd_help] } +proc get_help_text {} { + global ocd_helptext + return $ocd_helptext +} + # Production command # FIX!!! need to figure out how to feed back relevant output # from e.g. "flash banks" command... |