20 lines
447 B
OCaml
20 lines
447 B
OCaml
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
|
|
|
|
val check_defined_variables : DVCfg.t -> bool
|
|
|
|
val undefined_variables : DVCfg.t -> Variable.t list
|