diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-07-10 19:36:45 +0200 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-07-10 19:36:45 +0200 |
commit | cf94e6e6ee08732f3914174d12cb46e67e2adab6 (patch) | |
tree | e80627c99c513fd1eb1d7ec2d6d207a658c6e5f2 /kvx | |
parent | b44d87ef03279cb479101d7b02031cf78136062d (diff) | |
download | compcert-kvx-cf94e6e6ee08732f3914174d12cb46e67e2adab6.tar.gz compcert-kvx-cf94e6e6ee08732f3914174d12cb46e67e2adab6.zip |
begin relaxing
Diffstat (limited to 'kvx')
-rw-r--r-- | kvx/lib/PrepassSchedulingOracle.ml | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/kvx/lib/PrepassSchedulingOracle.ml b/kvx/lib/PrepassSchedulingOracle.ml index 322dff85..7e5e2f4a 100644 --- a/kvx/lib/PrepassSchedulingOracle.ml +++ b/kvx/lib/PrepassSchedulingOracle.ml @@ -125,15 +125,13 @@ let get_simple_dependencies (seqa : (instruction*Regset.t) array) = begin fun i (insn, other_uses) -> List.iter (fun use -> - print_endline "add other use"; add_input_reg i use) (Regset.elements other_uses); match insn with | Inop _ -> () | Iop(op, inputs, output, _) -> - (* (if Op.is_trapping_op op then set_branch i); *) - set_branch i; + (if Op.is_trapping_op op then set_branch i); add_input_regs i inputs; add_output_reg i (latency_of_op op (List.length inputs)) output | Iload(trap, chunk, addressing, addr_regs, output, _) -> |