this is cool
Posted to
tcl
by colin at Wed Nov 17 23:40:47 GMT 2010
view raw
namespace
eval foo {
proc
bar {} {
while
{1} {
variable
v
puts
[
incr
v]
yield
}
}
}
coroutine ::coro ::foo::bar
namespace
delete ::foo
while
{1} {
::coro
}
Recent Posts
tcl by egavilan
6 days ago
tcl by bch
12 days ago
tcl by Bradipo
12 days ago
tcl by aspect
12 days ago
tcl by Bradipo
12 days ago
tcl by Bradipo
12 days ago
tcl by Bradipo
12 days ago
lilypond by Bradipo
14 days ago
tcl by cgm
24 days ago
tcl by dandyn
33 days ago
Submit
New paste
Documentation
From Jabber