Translate last before removing automatons.

This commit is contained in:
Léonard Gérard 2012-11-05 10:10:32 +01:00
parent 355998bab3
commit db89208f22

View file

@ -56,15 +56,15 @@ let compile_program p =
(* Completion of partial definitions *) (* Completion of partial definitions *)
let p = pass "Completion" true Completion.program p pp in let p = pass "Completion" true Completion.program p pp in
(* Shared variables (remove last) *)
let p = pass "Last" true Last.program p pp in
(* Automata *) (* Automata *)
let p = pass "Automata" true Automata.program p pp in let p = pass "Automata" true Automata.program p pp in
(* Present *) (* Present *)
let p = pass "Present" true Present.program p pp in let p = pass "Present" true Present.program p pp in
(* Shared variables (last) *)
let p = pass "Last" true Last.program p pp in
(* Reset *) (* Reset *)
let p = pass "Reset" true Reset.program p pp in let p = pass "Reset" true Reset.program p pp in