DGNum/liminix
14
0
Fork 2
Code Issues 15 Pull requests 7 Projects Releases Packages Wiki Activity Actions

fix revents in unpack-pollfds

Browse source
This commit is contained in:
Daniel Barlow 2024-04-24 18:31:26 +01:00
parent 16af3984c9
commit b4ba3eea21
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
pkgs/devout/devout.fnl
View file

@ -82,7 +82,7 @@
(collect [_ v (ipairs pollfds)] (collect [_ v (ipairs pollfds)]
(let [fd (band (rshift v 32) 0xffffffff) (let [fd (band (rshift v 32) 0xffffffff)
revent (band v 0xffff)] revent (band v 0xffff)]
(values fd revent)))) (values fd (if (> revent 0) revent nil)))))
(fn parse-terms [str] (fn parse-terms [str]
(print :terms str) (print :terms str)