foreach return
Posted to
tcl
by jima at Wed Jan 08 18:53:14 GMT 2014
view raw
(Desktop) 2 %
proc
a {} {
>
foreach
v {1 2 3 4} {
>
if
{
$v
eq 2} {
return
$v
}
> }
>
return
1
> }
(Desktop) 3 % a
2
(Desktop) 4 %
Recent Posts
tcl by dandyn
3 days ago
tcl by Bradipo
3 days ago
tcl by Bradipo
3 days ago
tcl by oldlaptop
27 days ago
tcl by oldlaptop
27 days ago
tcl by mookie
32 days ago
tcl by mookie
33 days ago
tcl by georgtree
34 days ago
tcl by georgtree
34 days ago
tcl by schelte
49 days ago
Submit
New paste
Documentation
From Jabber