load and verify are now synonymous to load/verify_image

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

diff --git a/src/helper/startup.tcl b/src/helper/startup.tcl
index fc70298da1a66edd19a92a446fd29e0576327932..fad7412ca20fa25eba3ca5ee3505dee8a369c70f 100644 (file)
--- a/src/helper/startup.tcl
+++ b/src/helper/startup.tcl
@@ -296,4 +296,13 @@ proc production_test {} {
 }
 add_help_text production "Runs test procedure. Throws exception if procedure failed. Prints progress messages."
 
+proc load {args} {
+       return [eval "load_image $args"]
+}
+add_help_text load "synonym to load_image"
+
+proc verify {args} {
+       return [eval "verify_image $args"]
+}
 
+add_help_text verify "synonym to verify_image"