rewrite fs_poll_basic.ml example.