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

1 files changed, 9 insertions, 0 deletions

diff --git a/src/helper/startup.tcl b/src/helper/startup.tcl
index fc70298d..fad7412c 100644
--- 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"