cfg: add stm32 flash driver alias

[fw/openocd] / src / flash / startup.tcl

diff --git a/src/flash/startup.tcl b/src/flash/startup.tcl
index 82959c8a136b418890f3ddbb3cc94eee3d723e71..b8d280b8e75fb97e100da4c4f0ca19746720a602 100644 (file)
--- a/src/flash/startup.tcl
+++ b/src/flash/startup.tcl
@@ -54,6 +54,8 @@ proc program {filename args} {
 
                if {[info exists reset]} {
                        # reset target if requested
+                       # also disable target polling, we are shutting down anyway
+                       poll off
                        echo "** Resetting Target **"
                        reset run
                }
@@ -68,6 +70,24 @@ proc program {filename args} {
 add_help_text program "write an image to flash, address is only required for binary images. verify, reset are optional"
 add_usage_text program "<filename> \[address\] \[verify\] \[reset\]"
 
+# stm32f0x uses the same flash driver as the stm32f1x
+# this alias enables the use of either name.
+proc stm32f0x args {
+       eval stm32f1x $args
+}
+
+# stm32f3x uses the same flash driver as the stm32f1x
+# this alias enables the use of either name.
+proc stm32f3x args {
+       eval stm32f1x $args
+}
+
+# stm32f4x uses the same flash driver as the stm32f2x
+# this alias enables the use of either name.
+proc stm32f4x args {
+       eval stm32f2x $args
+}
+
 # ease migration to updated flash driver
 proc stm32x args {
        echo "DEPRECATED! use 'stm32f1x $args' not 'stm32x $args'"