diff options
author | oharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60> | 2008-07-20 17:04:58 +0000 |
---|---|---|
committer | oharboe <oharboe@b42882b7-edfa-0310-969c-e2dbd0fdcd60> | 2008-07-20 17:04:58 +0000 |
commit | 6c0553c8c504d4c6da20857abeec80648d841b72 (patch) | |
tree | ef5a8e4e4d925f27a354bf870aa9a9a2c4b7bf21 /src/tcl/memory.tcl | |
parent | 42501f0ef0beb573fcbe904320b9a0fba02dcc3b (diff) | |
download | openocd_libswd-6c0553c8c504d4c6da20857abeec80648d841b72.tar.gz openocd_libswd-6c0553c8c504d4c6da20857abeec80648d841b72.tar.bz2 openocd_libswd-6c0553c8c504d4c6da20857abeec80648d841b72.tar.xz openocd_libswd-6c0553c8c504d4c6da20857abeec80648d841b72.zip |
openocd@duaneellis.com fix naming confusion. Use ocd_ prefix for ocd API consistently.
git-svn-id: svn://svn.berlios.de/openocd/trunk@839 b42882b7-edfa-0310-969c-e2dbd0fdcd60
Diffstat (limited to 'src/tcl/memory.tcl')
-rw-r--r-- | src/tcl/memory.tcl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/tcl/memory.tcl b/src/tcl/memory.tcl index 42cd0627..219d39fa 100644 --- a/src/tcl/memory.tcl +++ b/src/tcl/memory.tcl @@ -80,7 +80,7 @@ proc address_info { ADDRESS } { proc memread32 {ADDR} { set foo(0) 0 - if ![ catch { mem2array foo 32 $ADDR 1 } msg ] { + if ![ catch { ocd_mem2array foo 32 $ADDR 1 } msg ] { return $foo(0) } else { error "memread32: $msg" @@ -89,7 +89,7 @@ proc memread32 {ADDR} { proc memread16 {ADDR} { set foo(0) 0 - if ![ catch { mem2array foo 16 $ADDR 1 } msg ] { + if ![ catch { ocd_mem2array foo 16 $ADDR 1 } msg ] { return $foo(0) } else { error "memread16: $msg" @@ -98,7 +98,7 @@ proc memread16 {ADDR} { proc memread8 {ADDR} { set foo(0) 0 - if ![ catch { mem2array foo 8 $ADDR 1 } msg ] { + if ![ catch { ocd_mem2array foo 8 $ADDR 1 } msg ] { return $foo(0) } else { error "memread8: $msg" @@ -107,7 +107,7 @@ proc memread8 {ADDR} { proc memwrite32 {ADDR DATA} { set foo(0) $DATA - if ![ catch { array2mem foo 32 $ADDR 1 } msg ] { + if ![ catch { ocd_array2mem foo 32 $ADDR 1 } msg ] { return $foo(0) } else { error "memwrite32: $msg" @@ -116,7 +116,7 @@ proc memwrite32 {ADDR DATA} { proc memwrite16 {ADDR DATA} { set foo(0) $DATA - if ![ catch { array2mem foo 16 $ADDR 1 } msg ] { + if ![ catch { ocd_array2mem foo 16 $ADDR 1 } msg ] { return $foo(0) } else { error "memwrite16: $msg" @@ -125,7 +125,7 @@ proc memwrite16 {ADDR DATA} { proc memwrite8 {ADDR DATA} { set foo(0) $DATA - if ![ catch { array2mem foo 8 $ADDR 1 } msg ] { + if ![ catch { ocd_array2mem foo 8 $ADDR 1 } msg ] { return $foo(0) } else { error "memwrite8: $msg" |