X-Git-Url: https://review.openocd.org/gitweb?p=openocd.git;a=blobdiff_plain;f=src%2Fflash%2Fstartup.tcl;h=b8d280b8e75fb97e100da4c4f0ca19746720a602;hp=82959c8a136b418890f3ddbb3cc94eee3d723e71;hb=a35712a85c420e24a9c7e9a5eea4fc6d3aff6342;hpb=2467da4b4aad750d2b3d56998bcf07674047687a

diff --git a/src/flash/startup.tcl b/src/flash/startup.tcl
index 82959c8a13..b8d280b8e7 100644
--- 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'"