int -> [[> 'Cf_poll.state_t ]] Cf_poll.event