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