Skip to content
Snippets Groups Projects
Commit d29d90b1 authored by Virgile Prevosto's avatar Virgile Prevosto
Browse files

Merge branch 'feature/boris/rm-dataflow' into 'master'

Use Dataflow2 instead of completely outdated Dataflow

See merge request frama-c/e-acsl!227
parents d048ed79 cc1e354f
No related branches found
No related tags found
No related merge requests found
......@@ -23,6 +23,8 @@
open Cil_types
open Cil_datatype
module Dataflow = Dataflow2
(* ********************************************************************** *)
(* Backward dataflow analysis to compute a sound over-approximation of what
left-values must be tracked by the memory model library *)
......@@ -152,7 +154,7 @@ module rec Transfer
let name = "E_ACSL.Pre_analysis"
let debug = ref false
let debug = false
type t = Varinfo.Hptset.t option
......@@ -577,16 +579,6 @@ let register_predicate kf pred state =
block would normally be put in the worklist. *)
let filterStmt _predecessor _block = true
(** Must return [true] if there is a path in the control-flow graph of the
function from the first statement to the second. Used to choose a "good"
node in the worklist. Suggested use is [let stmt_can_reach =
Stmts_graph.stmt_can_reach kf], where [kf] is the kernel_function
being analyzed; [let stmt_can_reach _ _ = true] is also correct,
albeit less efficient *)
let stmt_can_reach stmt =
let _, kf = Kernel_function.find_from_sid stmt.sid in
Stmts_graph.stmt_can_reach kf stmt
end
and Compute: sig
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment