'a -> ('a -> 'a #Uq_engines_compat.engine) Stdlib.Stream.t -> Unixqueue.event_system -> ['a] Uq_engines_compat.engine