interesting
/
riscv-openocd
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

startup.tcl: remove commands already deprecated in v0.7.0 

Some command were already marked as deprecated in release v0.7.0,
more then 7 years ago, and for some of them the depredation date
is even earlier.
We can reasonably expect that in these 7 years any user of OpenOCD
has already migrated to v0.7.0 or to some following intermediate
build, thus has already updated any local/personal script to get
rid of the deprecated message.

Drop the commands already deprecated in v0.7.0.

Change-Id: I81cdc415ab855ebf30980ef5199f9780c5d7f932
Signed-off-by: Antonio Borneo <borneo.antonio@gmail.com>
Reviewed-on: http://openocd.zylin.com/6085
Tested-by: jenkins
Reviewed-by: Tarek BOCHKATI <tarek.bouchkati@gmail.com>
Reviewed-by: Tomas Vanek <vanekt@fbl.cz>
This commit is contained in:
Antonio Borneo 2020-10-31 23:58:33 +01:00
parent d02e29daba
commit 70ead8ff5d
3 changed files with 1 additions and 70 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/flash/startup.tcl
View File

@ -119,14 +119,3 @@ proc stm32g4x args { eval stm32l4x $args }
proc stm32l5x args { eval stm32l4x $args } proc stm32l5x args { eval stm32l4x $args }
proc stm32wbx args { eval stm32l4x $args } proc stm32wbx args { eval stm32l4x $args }
proc stm32wlx args { eval stm32l4x $args } proc stm32wlx args { eval stm32l4x $args }
# ease migration to updated flash driver
proc stm32x args {
echo "DEPRECATED! use 'stm32f1x $args' not 'stm32x $args'"
eval stm32f1x $args
}
proc stm32f2xxx args {
echo "DEPRECATED! use 'stm32f2x $args' not 'stm32f2xxx $args'"
eval stm32f2x $args
}

43
src/jtag/startup.tcl
View File

@ -117,23 +117,8 @@ proc jtag_ntrst_assert_width args {
# JTAG-specific names despite the fact that the operations were not # JTAG-specific names despite the fact that the operations were not
# specific to JTAG, or otherwise had troublesome/misleading names. # specific to JTAG, or otherwise had troublesome/misleading names.
# #
# FIXME phase these aids out after about April 2011 # FIXME phase these aids out after some releases
# #
proc jtag_khz args {
echo "DEPRECATED! use 'adapter speed' not 'jtag_khz'"
eval adapter speed $args
}
proc jtag_nsrst_delay args {
echo "DEPRECATED! use 'adapter srst delay' not 'jtag_nsrst_delay'"
eval adapter srst delay $args
}
proc jtag_nsrst_assert_width args {
echo "DEPRECATED! use 'adapter srst pulse_width' not 'jtag_nsrst_assert_width'"
eval adapter srst pulse_width $args
}
proc jtag_reset args { proc jtag_reset args {
echo "DEPRECATED! use 'adapter \[de\]assert' not 'jtag_reset'" echo "DEPRECATED! use 'adapter \[de\]assert' not 'jtag_reset'"
switch $args { switch $args {
@ -150,32 +135,6 @@ proc jtag_reset args {
} }
} }
# stlink migration helpers
proc stlink_device_desc args {
echo "DEPRECATED! use 'hla_device_desc' not 'stlink_device_desc'"
eval hla_device_desc $args
}
proc stlink_serial args {
echo "DEPRECATED! use 'hla_serial' not 'stlink_serial'"
eval hla_serial $args
}
proc stlink_layout args {
echo "DEPRECATED! use 'hla_layout' not 'stlink_layout'"
eval hla_layout $args
}
proc stlink_vid_pid args {
echo "DEPRECATED! use 'hla_vid_pid' not 'stlink_vid_pid'"
eval hla_vid_pid $args
}
proc stlink args {
echo "DEPRECATED! use 'hla' not 'stlink'"
eval hla $args
}
proc adapter_khz args { proc adapter_khz args {
echo "DEPRECATED! use 'adapter speed' not 'adapter_khz'" echo "DEPRECATED! use 'adapter speed' not 'adapter_khz'"
eval adapter speed $args eval adapter speed $args

17
src/target/startup.tcl
View File

@ -179,12 +179,6 @@ proc using_hla {} {
######### #########
# Temporary migration aid. May be removed starting in January 2011.
proc armv4_5 params {
echo "DEPRECATED! use 'arm $params' not 'armv4_5 $params'"
arm $params
}
# Target/chain configuration scripts can either execute commands directly # Target/chain configuration scripts can either execute commands directly
# or define a procedure which is executed once all configuration # or define a procedure which is executed once all configuration
# scripts have completed. # scripts have completed.
@ -212,14 +206,3 @@ proc init_target_events {} {
# Additionally board config scripts can define a procedure init_board that will be executed after init and init_targets # Additionally board config scripts can define a procedure init_board that will be executed after init and init_targets
proc init_board {} { proc init_board {} {
} }
# deprecated target name cmds
proc cortex_m3 args {
echo "DEPRECATED! use 'cortex_m' not 'cortex_m3'"
eval cortex_m $args
}
proc cortex_a8 args {
echo "DEPRECATED! use 'cortex_a' not 'cortex_a8'"
eval cortex_a $args
}