diff options
-rw-r--r-- | src/tcl/memory.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/tcl/memory.tcl b/src/tcl/memory.tcl index 1f90ef2c..5ac3c4bd 100644 --- a/src/tcl/memory.tcl +++ b/src/tcl/memory.tcl @@ -96,7 +96,7 @@ proc memread16 {ADDR } { } } -proc memread82 {ADDR } { +proc memread8 {ADDR } { set foo(0) 0 if ![ catch { mem2array foo 8 $ADDR 1 } msg ] { return $foo(0) |