如何触发和处理点击事件?

时间:2014-09-13 15:19:45

标签: ocaml js-of-ocaml

在下面的代码中,我尝试在复选框上处理click事件。我期待看到“#34;你好"在javascript控制台中打印,但我没有看到任何内容。如何修改代码以使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;

1 个答案:

答案 0 :(得分:1)

您需要使用新行Printf.printf "hello\n"或显式刷新flush stdout来刷新标准输出。