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 oldlaptop
2 days ago
tcl by mookie
8 days ago
tcl by dandyn
15 days ago
tcl by Bradipo
15 days ago
tcl by Bradipo
15 days ago
tcl by oldlaptop
40 days ago
tcl by oldlaptop
40 days ago
tcl by mookie
45 days ago
tcl by mookie
45 days ago
tcl by georgtree
47 days ago
Submit
New paste
Documentation
From Jabber