uplevel 1 return -code break -- why?
Posted to
tcl
by kostix at Wed Aug 15 22:58:11 GMT 2007
view raw
%
proc
mybreak {} {
uplevel
1
return
-code
break
}
%
proc
foo {} {
set
i 0
while
true {
incr
i
if
{
$i
== 10} {
mybreak
}
}
puts
"must not reach here"
}
% foo
must not reach here
Recent Posts
tcl by schelte
7 days ago
tcl by emiliano
14 days ago
tcl by fvogel
14 days ago
tcl by emiliano
14 days ago
tcl by rmax
31 days ago
tcl by oldlaptop
31 days ago
tcl by schelte
32 days ago
tcl by Bradipo
44 days ago
tcl by kbk
55 days ago
tcl by oldlaptop
58 days ago
Submit
New paste
Documentation
From Jabber