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