mirror of
https://github.com/janet-lang/janet
synced 2025-01-05 05:10:26 +00:00
Fix mingw build warnings.
This commit is contained in:
parent
ce528251d5
commit
e88aab6d68
@ -50,7 +50,9 @@
|
||||
[]
|
||||
(assert (zero? (ev/count chan)) "channel check empty")
|
||||
(ev/sleep 0) # turn the event loop
|
||||
(assert (zero? (ev/count chan)) "channel check empty"))
|
||||
(assert (zero? (ev/count chan)) "channel check empty")
|
||||
# Drain if not empty, help with failures after this
|
||||
(while (pos? (ev/count chan)) (printf "extra: %p" (ev/take chan))))
|
||||
|
||||
(defn spit-file
|
||||
[dir name]
|
||||
|
Loading…
Reference in New Issue
Block a user