sig external isKeyPressed : key:SFKey.t -> bool = "caml_sfKeyboard_isKeyPressed" external getKeyCount : unit -> int = "caml_sfKeyCount" end