X-Git-Url: https://review.openocd.org/gitweb?a=blobdiff_plain;f=src%2Fflash%2Fstartup.tcl;h=b8d280b8e75fb97e100da4c4f0ca19746720a602;hb=40815bd39a7ee9f93a95a89e978fdace081c3563;hp=7b2b4a4ab0a528a8b1883de9f246d79c28856852;hpb=3f0e9c8ad2c67ee459a5ab8736679f40d46ef7d9;p=openocd.git

diff --git a/src/flash/startup.tcl b/src/flash/startup.tcl
index 7b2b4a4ab0..b8d280b8e7 100644
--- a/src/flash/startup.tcl
+++ b/src/flash/startup.tcl
@@ -70,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'"