From 82dd17e2488ae233d8818901ec6f07525694e55e Mon Sep 17 00:00:00 2001 From: Steven Stallion Date: Mon, 26 Nov 2018 20:01:34 -0600 Subject: [PATCH 1/1] mem_helper: add mrh command This patch adds support for reading halfword values from memory. This command compliments existing support for writing halfwords (mwh). Change-Id: I8ec628e65c05a7f00aa57e3af0f228eb8bd4d14e Signed-off-by: Steven Stallion Reviewed-on: http://openocd.zylin.com/4781 Tested-by: jenkins Reviewed-by: Antonio Borneo --- tcl/mem_helper.tcl | 11 +++++++++++ 1 file changed, 11 insertions(+) diff --git a/tcl/mem_helper.tcl b/tcl/mem_helper.tcl index 86ad00f7eb..5955793e25 100644 --- a/tcl/mem_helper.tcl +++ b/tcl/mem_helper.tcl @@ -10,6 +10,17 @@ proc mrw {reg} { add_usage_text mrw "address" add_help_text mrw "Returns value of word in memory." +# mrh: "memory read halfword", returns value of $reg +proc mrh {reg} { + set value "" + mem2array value 16 $reg 1 + return $value(0) +} + +add_usage_text mrh "address" +add_help_text mrh "Returns value of halfword in memory." + +# mrb: "memory read byte", returns value of $reg proc mrb {reg} { set value "" mem2array value 8 $reg 1 -- 2.30.2