diff options
Diffstat (limited to 'Inotify.icl')
-rw-r--r-- | Inotify.icl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Inotify.icl b/Inotify.icl index 205aba9..d25a426 100644 --- a/Inotify.icl +++ b/Inotify.icl @@ -122,7 +122,8 @@ where inotify_is_event :: INMask INEvent -> Bool inotify_is_event mask ev = ev bitand mask <> 0 -inotify_loop_with_timeout :: !(Maybe Int) !*(Inotify st) !*World -> *(!*Inotify st, !*World) +inotify_loop_with_timeout :: !(Maybe Int) !*(Inotify st) !*World + -> *(!*Inotify st, !*World) inotify_loop_with_timeout to inot w # (n,inot) = inotify_poll to inot | n == 0 = (inot,w) |