sig
  type t
  external create : unit -> SFContext.t = "caml_sfContext_create"
  external destroy : context:SFContext.t -> unit = "caml_sfContext_destroy"
  external getSettings : context:SFContext.t -> SFContextSettings.t
    = "caml_sfContext_getSettings"
  external setActive : context:SFContext.t -> active:bool -> unit
    = "caml_sfContext_setActive"
  external getActiveContext : unit -> SFContext.t option
    = "caml_sfContext_getActiveContext"
  external getActiveContextId : unit -> int64
    = "caml_sfContext_getActiveContextId"
end