diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2021-01-22 14:17:39 +0100 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2021-01-22 14:17:39 +0100 |
commit | cac0556d551438b5dc3bbb6b701ae0101b214e0f (patch) | |
tree | c97b791ac6c8029f512e9b110dd5e430817d806d /aarch64/PostpassSchedulingOracle.ml | |
parent | e265be77756b14b1d830a0d0faf1b105494bbb43 (diff) | |
parent | 0bc5b0f9fe8a2463ddb147671359a5b374cfd50c (diff) | |
download | compcert-kvx-cac0556d551438b5dc3bbb6b701ae0101b214e0f.tar.gz compcert-kvx-cac0556d551438b5dc3bbb6b701ae0101b214e0f.zip |
Merge remote-tracking branch 'origin/aarch64-peephole' into kvx-work
Diffstat (limited to 'aarch64/PostpassSchedulingOracle.ml')
-rw-r--r-- | aarch64/PostpassSchedulingOracle.ml | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/aarch64/PostpassSchedulingOracle.ml b/aarch64/PostpassSchedulingOracle.ml index d7fab1de..cde3e7a7 100644 --- a/aarch64/PostpassSchedulingOracle.ml +++ b/aarch64/PostpassSchedulingOracle.ml @@ -137,8 +137,8 @@ let load_rec ldi = | PLd_rd_a (ld, rd, a) -> load_rd_a_rec (PBasic (PLoad ldi)) (reg_of_dreg rd) a | Pldp (ld, rd1, rd2, _, _, a) -> - load_rd1_rd2_a_rec (PBasic (PLoad ldi)) (reg_of_ireg rd1) - (reg_of_ireg rd2) a + load_rd1_rd2_a_rec (PBasic (PLoad ldi)) (reg_of_dreg rd1) + (reg_of_dreg rd2) a let store_rs_a_rec st rs a = { @@ -161,8 +161,8 @@ let store_rec sti = | PSt_rs_a (st, rs, a) -> store_rs_a_rec (PBasic (PStore sti)) (reg_of_dreg rs) a | Pstp (st, rs1, rs2, _, _, a) -> - store_rs1_rs2_a_rec (PBasic (PStore sti)) (reg_of_ireg rs1) - (reg_of_ireg rs2) a + store_rs1_rs2_a_rec (PBasic (PStore sti)) (reg_of_dreg rs1) + (reg_of_dreg rs2) a let loadsymbol_rec i rd id = { inst = i; write_locs = [ rd ]; read_locs = [ Mem ]; is_control = false } |