Skip to content
Snippets Groups Projects
Commit f6b3f93b authored by Valentin Perrelle's avatar Valentin Perrelle
Browse files

[aorai] use Path_analysis to retrieve init states

parent 3a447c0c
No related branches found
No related tags found
No related merge requests found
...@@ -2018,14 +2018,8 @@ let removeUnusedTransitionsAndStates () = ...@@ -2018,14 +2018,8 @@ let removeUnusedTransitionsAndStates () =
(Aorai_state.Set.add state set) (Aorai_state.Set.add state set)
in in
let reached _ state set = Aorai_state.Map.fold treat_one_state state set in let reached _ state set = Aorai_state.Map.fold treat_one_state state set in
let init = let init = Path_analysis.get_init_states (getAutomata ()) in
List.fold_left let reached_states = Pre_state.fold reached (Aorai_state.Set.of_list init) in
(fun acc x ->
if x.init = Bool3.True then Aorai_state.Set.add x acc else acc)
Aorai_state.Set.empty
(fst (getAutomata()))
in
let reached_states = Pre_state.fold reached init in
let reached_states = Post_state.fold reached reached_states in let reached_states = Post_state.fold reached reached_states in
let reached_states = Loop_init_state.fold reached reached_states in let reached_states = Loop_init_state.fold reached reached_states in
let reached_states = Loop_invariant_state.fold reached reached_states in let reached_states = Loop_invariant_state.fold reached reached_states in
......
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