sig
  type t
  external create : unit -> SFClock.t = "caml_sfClock_Create"
  external destroy : clock:SFClock.t -> unit = "caml_sfClock_Destroy"
  external getTime : clock:SFClock.t -> float = "caml_sfClock_GetTime"
  external reset : clock:SFClock.t -> unit = "caml_sfClock_Reset"
  external sleep : duration:float -> unit = "caml_sfSleep"
end