Commit 4c8b73f0 authored by Armillon Damien's avatar Armillon Damien
Browse files

Merge remote-tracking branch 'le-remote-d-origine/master'

parents 53ff196a 224fc185
......@@ -181,6 +181,7 @@ let _ =
end;
let compiler_res =
try
pass_tokenize input >>= fun tokens ->
pass_parse tokens >>= fun (ast, _) ->
pass_elang ast >>= fun ep ->
......@@ -200,6 +201,10 @@ let _ =
pass_linear_dse linear lives >>= fun linear ->
run "Linear after DSE" !linear_run_after_dse exec_linear_prog linear;
pass_ltl_gen linear
with e ->
let emsg = Printexc.to_string e ^ "\n" ^ Printexc.get_backtrace () in
record_compile_result ~error:(Some emsg) "global";
Error emsg
in
begin
match compiler_res with
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment