Tcl commands: Fix improper return status in flash commands and load_image.

[openocd] / src / target / target.c

diff --git a/src/target/target.c b/src/target/target.c
index 9fc9d20fcf5b8921e3526d6ec2b0458c56dff43f..c23590e5989c50977ce99b5a448e567f7784223b 100644 (file)
--- a/src/target/target.c
+++ b/src/target/target.c
@@ -3166,7 +3166,7 @@ COMMAND_HANDLER(handle_load_image_command)
        duration_start(&bench);
 
        if (image_open(&image, CMD_ARGV[0], (CMD_ARGC >= 3) ? CMD_ARGV[2] : NULL) != ERROR_OK)
-               return ERROR_OK;
+               return ERROR_FAIL;
 
        image_size = 0x0;
        retval = ERROR_OK;
@@ -3176,6 +3176,7 @@ COMMAND_HANDLER(handle_load_image_command)
                        command_print(CMD_CTX,
                                                  "error allocating buffer for section (%d bytes)",
                                                  (int)(image.sections[i].size));
+                       retval = ERROR_FAIL;
                        break;
                }