[PATCH]: f7bef5149f flash/startup.tcl: Use "flash verify_image" for program verify

[gerrit]

This is an automated email from Gerrit.

"Grant Ramsay <grant.ram...@hotmail.com>" just uploaded a new patch set to 
Gerrit, which you can find at https://review.openocd.org/c/openocd/+/8377

-- gerrit

commit f7bef5149fe43e222681289809287d485c2bc0fe
Author: Grant Ramsay <grant.ram...@hotmail.com>
Date:   Tue Jun 25 16:54:21 2024 +1200

    flash/startup.tcl: Use "flash verify_image" for program verify
    
    The "verify_image" command relies on the flash being memory mapped.
    Whereas the "flash verify_image" command lets the flash driver
    determine how to do the verification and falls back to a memory
    mapped checksum if not implemented
    
    Change-Id: If2b9c5607655ff95d690fa4b46cac6c937291566
    Signed-off-by: Grant Ramsay <grant.ram...@hotmail.com>

diff --git a/src/flash/startup.tcl b/src/flash/startup.tcl
index 654f201a4e..f3cedd5136 100644
--- a/src/flash/startup.tcl
+++ b/src/flash/startup.tcl
@@ -58,7 +58,7 @@ proc program {filename args} {
        # Check whether programming is needed
        if {[info exists preverify]} {
                echo "**pre-verifying**"
-               if {[catch {eval verify_image $flash_args}] == 0} {
+               if {[catch {eval flash verify_image $flash_args}] == 0} {
                        echo "**Verified OK - No flashing**"
                        set needsflash 0
                }
@@ -73,7 +73,7 @@ proc program {filename args} {
                        if {[info exists verify]} {
                                # verify phase
                                echo "** Verify Started **"
-                               if {[catch {eval verify_image $flash_args}] == 
0} {
+                               if {[catch {eval flash verify_image 
$flash_args}] == 0} {
                                        echo "** Verified OK **"
                                } else {
                                        program_error "** Verify Failed **" 
$exit

--