Commit 21d43bc4 authored by Léo Gourdin's avatar Léo Gourdin
Browse files

Remove first nop when doing expansion

parent bc4a980b
This diff is collapsed.
......@@ -326,6 +326,7 @@ let scheduler f =
(*debug_flag := false;*)
(*print_superblocks lsb code; debug "\n";*)
find_last_node_reg (PTree.elements code);
(*node := !node - 1;*)
let (tc, pm) = do_schedule code pm lsb in
(((tc, entry), pm), id_ptree)
Supports Markdown
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