open Analysis

module Variable : sig
  type t
  val pp : out_channel -> t -> unit
end

module RISCCfg = CfgRISC.RISCCfg

module DVCfg : Dataflow.C with type elt = CfgRISC.RISCSimpleStatements.t
                           and type internal = Variable.t

val compute_defined_variables : RISCCfg.t -> DVCfg.t

val compute_cfg : DVCfg.t -> RISCCfg.t