sig
  type t
  external create : unit -> SFClock.t = "caml_sfClock_create"
  external restart : SFClock.t -> SFTime.t = "caml_sfClock_restart"
  external getElapsedTime : SFClock.t -> SFTime.t
    = "caml_sfClock_getElapsedTime"
end