sig
  val compute : (unit -> unit) Pervasives.ref
  val is_computed : (unit -> bool) Pervasives.ref
  val annotate_kf : (Cil_types.kernel_function -> unit) Pervasives.ref
  val is_computed_kf : (Cil_types.kernel_function -> bool) Pervasives.ref
  val self : State.t Pervasives.ref
  val do_precond : (Cil_types.kernel_function -> unit) Pervasives.ref
  val do_all_rte : (Cil_types.kernel_function -> unit) Pervasives.ref
  type status_accessor =
      State.t * (Cil_types.kernel_function -> State.t) *
      (Cil_types.kernel_function -> bool) *
      (Cil_types.kernel_function -> bool -> unit)
  val get_all_status :
    (unit -> Db.RteGen.status_accessor list) Pervasives.ref
  val get_precond_status : (unit -> Db.RteGen.status_accessor) Pervasives.ref
  val get_signedOv_status :
    (unit -> Db.RteGen.status_accessor) Pervasives.ref
  val get_divMod_status : (unit -> Db.RteGen.status_accessor) Pervasives.ref
  val get_downCast_status :
    (unit -> Db.RteGen.status_accessor) Pervasives.ref
  val get_memAccess_status :
    (unit -> Db.RteGen.status_accessor) Pervasives.ref
  val get_unsignedOv_status :
    (unit -> Db.RteGen.status_accessor) Pervasives.ref
end