sig
  val compute : (Db_types.kernel_function -> unit) Pervasives.ref
  exception Top
  val stmt_postdominators :
    (Db_types.kernel_function -> Cil_types.stmt -> Cilutil.StmtSet.t)
    Pervasives.ref
  val is_postdominator :
    (Db_types.kernel_function ->
     opening:Cil_types.stmt -> closing:Cil_types.stmt -> bool)
    Pervasives.ref
  val display : (unit -> unit) Pervasives.ref
  val print_dot : (string -> Db_types.kernel_function -> unit) Pervasives.ref
end