2024-12-12 16:37:36 +01:00
|
|
|
open Analysis
|
|
|
|
|
|
|
|
|
|
module Variable : sig
|
|
|
|
|
type t
|
|
|
|
|
val pp : out_channel -> t -> unit
|
2024-12-27 21:11:38 +01:00
|
|
|
val pplist : out_channel -> t list -> unit
|
2024-12-12 16:37:36 +01:00
|
|
|
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
|
2024-12-16 05:15:33 +01:00
|
|
|
|
2024-12-21 02:16:04 +01:00
|
|
|
val check_undefined_variables : DVCfg.t -> Variable.t list option
|