[passes] check unicity of the assignations for each var

This commit is contained in:
Arnaud DABY-SEESARAM
2022-12-13 15:55:21 +01:00
parent 69b963c305
commit e5ac9a719d
3 changed files with 66 additions and 1 deletions

View File

@@ -25,7 +25,7 @@ let exec_passes ast verbose debug passes f =
let _ =
(** Usage and argument parsing. *)
let default_passes = ["pre2vars"] in
let default_passes = ["chkvar_init_unicity"; "pre2vars"] in
let usage_msg =
"Usage: main [-passes p1,...,pn] [-ast] [-verbose] [-debug] \
[-o output_file] source_file\n" in
@@ -56,6 +56,7 @@ let _ =
List.iter (fun (s, k) -> Hashtbl.add passes_table s k)
[
("pre2vars", Passes.pre2vars);
("chkvar_init_unicity", Passes.chkvar_init_unicity);
];
(** Main functionality below *)