1
0
mirror of https://github.com/janet-lang/janet synced 2025-10-07 20:12:27 +00:00

More work on windows event loop code.

This commit is contained in:
Calvin Rose
2020-10-06 19:07:29 -05:00
parent 2e944931b3
commit 964a800d51
4 changed files with 27 additions and 21 deletions

View File

@@ -3,9 +3,10 @@
(defn writer [c]
(for i 0 3
(def item (string i ":" (hash c)))
(ev/sleep 0.1)
(print "writer giving item " i " to " c "...")
(ev/give c (string "item " i)))
(print "writer giving item " item " to " c "...")
(ev/give c item))
(print "Done!"))
(defn reader [name]