TCL scripts: collect duplicated procedures

TCL procedures mrw and mmw, originally in DaVinci target code,
are duplicated in other TCL scripts.
Moved in a common helper file, and added help/usage description.

Signed-off-by: Antonio Borneo <borneo.antonio@gmail.com>
This commit is contained in:
Antonio Borneo
2010-09-21 16:06:37 +08:00
committed by Øyvind Harboe
parent ea48794210
commit edefee9880
4 changed files with 25 additions and 35 deletions

View File

@@ -46,12 +46,7 @@ $_TARGETNAME configure -work-area-phys 0x20000000 -work-area-size $_WORKAREASIZE
# this, if you're using a slower clock.
adapter_khz 500
# mrw: "memory read word", returns value of $reg
proc mrw {reg} {
set value ""
mem2array value 32 $reg 1
return $value(0)
}
source [find mem_helper.tcl]
$_TARGETNAME configure -event reset-start {
adapter_khz 500