mirror of
https://github.com/janet-lang/janet
synced 2024-12-27 00:40:26 +00:00
20 lines
378 B
Clojure
20 lines
378 B
Clojure
(def f
|
|
(coro
|
|
(for i 0 10
|
|
(yield (string "yield " i))
|
|
(os/sleep 0))))
|
|
|
|
(print "simple yielding")
|
|
(each item f (print "got: " item ", now " (fiber/status f)))
|
|
|
|
(def f
|
|
(coro
|
|
(for i 0 10
|
|
(yield (string "yield " i))
|
|
(ev/sleep 0))))
|
|
|
|
(print "complex yielding")
|
|
(each item f (print "got: " item ", now " (fiber/status f)))
|
|
|
|
(print (fiber/status f))
|