Work on getting ev support on windows.

This commit is contained in:
Calvin Rose
2020-10-04 12:46:15 -05:00
parent 307c7e00e2
commit db67538311
4 changed files with 191 additions and 28 deletions
+12
View File
@@ -0,0 +1,12 @@
(defn worker
"Run for a number of iterations."
[name iterations]
(for i 0 iterations
(ev/sleep 1)
(print "worker " name " iteration " i)))
(ev/call worker :a 10)
(ev/sleep 0.2)
(ev/call worker :b 5)
(ev/sleep 0.3)
(ev/call worker :c 12)