diff options
Diffstat (limited to 'tcl/bitsbytes.tcl')
-rw-r--r-- | tcl/bitsbytes.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tcl/bitsbytes.tcl b/tcl/bitsbytes.tcl index 3f65c209..2c4fd290 100644 --- a/tcl/bitsbytes.tcl +++ b/tcl/bitsbytes.tcl @@ -54,7 +54,7 @@ proc show_normalize_bitfield { VALUE MSB LSB } { set m [create_mask $MSB $LSB] set mr [expr $VALUE & $m] set sr [expr $mr >> $LSB] - puts [format "((0x%08x & 0x%08x) -> 0x%08x) >> %2d => (0x%x) %5d " $VALUE $m $mr $LSB $sr $sr] + echo [format "((0x%08x & 0x%08x) -> 0x%08x) >> %2d => (0x%x) %5d " $VALUE $m $mr $LSB $sr $sr] return $sr } |