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