From e7b2958229c7e0d7e98e130764aa50d1ca9017d3 Mon Sep 17 00:00:00 2001 From: Antonio Borneo Date: Mon, 8 Nov 2010 17:23:49 +0800 Subject: TCL scripts: replace "puts" with "echo" Signed-off-by: Antonio Borneo --- tcl/chip/st/spear/quirk_no_srst.tcl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'tcl/chip/st/spear/quirk_no_srst.tcl') diff --git a/tcl/chip/st/spear/quirk_no_srst.tcl b/tcl/chip/st/spear/quirk_no_srst.tcl index df227642..fd02d07c 100644 --- a/tcl/chip/st/spear/quirk_no_srst.tcl +++ b/tcl/chip/st/spear/quirk_no_srst.tcl @@ -37,9 +37,9 @@ proc sp_reset_deassert_post {} { set bar(3) \\ poll on - puts "====> Press reset button on the board <====" + echo "====> Press reset button on the board <====" for {set i 0} { [sp_is_halted] == 0 } { set i [expr $i + 1]} { - puts -nonewline "$bar([expr $i & 3])\r" + echo -n "$bar([expr $i & 3])\r" sleep 200 } -- cgit v1.2.3