simple example
Posted to
tcl
by aspect at Thu Feb 02 01:18:05 GMT 2017
view raw
foreach
a {2 4 6 8} {
try {
foreach
b {3 6 9 12} {
puts
"(
$a
,
$b
)"
if
{
$a
==
$b
} {throw
break
""}
}
} trap
break
{} {
break
}
}
Recent Posts
tcl by mjanssen
1 days ago
tcl by mjanssen
1 days ago
tcl by mjanssen
1 days ago
tcl by mjanssen
1 days ago
tcl by b0t
2 days ago
tcl by oldlaptop
2 days ago
tcl by aku
2 days ago
tcl by kbk
2 days ago
tcl by kbk
2 days ago
tcl by Jack
2 days ago
Submit
New paste
Documentation
From Jabber