Ocaml 如何触发和处理点击事件？

在下面的代码中，我尝试处理复选框上的单击事件。我希望看到javascript控制台中打印出“hello”这个词，但是我什么也看不到。如何修改代码以执行print语句

 let checkGroupByRounds = Dom_html.createInput ~_type:(Js.string "checkbox") doc in
  Lwt_js_events.clicks checkGroupByRounds (fun event event_loop ->
    Lwt.return (Printf.printf "hello"));
  Dom.appendChild container checkGroupByRounds;

---

您需要使用新行

Printf.Printf“hello\n”

或显式刷新

flush stdout

刷新标准输出