Skip to content
Snippets Groups Projects
Commit 40b60546 authored by David Bühler's avatar David Bühler
Browse files

[kernel] Fixes some comments in dominators.

parent c22fbdce
No related branches found
No related tags found
No related merge requests found
...@@ -21,7 +21,7 @@ ...@@ -21,7 +21,7 @@
(**************************************************************************) (**************************************************************************)
(* This module performs dataflow analysis using [Interpreted_automata] to (* This module performs dataflow analysis using [Interpreted_automata] to
compute the domination/postdomination dependancies between statements of a compute the domination/postdomination dependencies between statements of a
given function. *) given function. *)
open Cil_types open Cil_types
...@@ -110,9 +110,9 @@ module DotGraph = Graph.Graphviz.Dot ( ...@@ -110,9 +110,9 @@ module DotGraph = Graph.Graphviz.Dot (
let get_subgraph _v = None let get_subgraph _v = None
end) end)
(* Both analysis are using this domain. It simply propagate all encountered (* Both analyses use this domain, which propagates all encountered statements
statements by adding them to the state. The [join] performs an intersection by adding them to the state. The [join] performs an intersection which is
which is enough to compute domination/postdomination. *) enough to compute domination/postdomination. *)
module Domain = struct module Domain = struct
type t = StmtSet.t type t = StmtSet.t
...@@ -124,7 +124,7 @@ module Domain = struct ...@@ -124,7 +124,7 @@ module Domain = struct
else else
Widening (join a b) Widening (join a b)
(* Trivial transfert function : add all visited statements to the current (* Trivial transfer function: add all visited statements to the current
state. *) state. *)
let transfer v _ state = let transfer v _ state =
match v.vertex_start_of with match v.vertex_start_of with
......
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