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 Bradipo
4 days ago
tcl by Stu
25 days ago
tcl by rhobart
39 days ago
tcl by stevel
43 days ago
tcl by dandyn
51 days ago
tcl by dandyn
51 days ago
tcl by dandyn
51 days ago
tcl by dandyn
53 days ago
tcl by dandyn
53 days ago
tcl by emiliano
64 days ago
Submit
New paste
Documentation
From Jabber