diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-04-20 23:51:53 +0200 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2020-04-20 23:51:53 +0200 |
commit | adb864a2a9e607f45e73c518f267264fdb570a19 (patch) | |
tree | e1556e6eadd0fcda9aaef3fe4dc9db0d59353dba /backend/CSE2.v | |
parent | fcf5b5c840f93d8c8b09ba299ab3962f43f080d3 (diff) | |
download | compcert-kvx-adb864a2a9e607f45e73c518f267264fdb570a19.tar.gz compcert-kvx-adb864a2a9e607f45e73c518f267264fdb570a19.zip |
forward moves into store source
Diffstat (limited to 'backend/CSE2.v')
-rw-r--r-- | backend/CSE2.v | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/backend/CSE2.v b/backend/CSE2.v index d9fe5799..dabbaa22 100644 --- a/backend/CSE2.v +++ b/backend/CSE2.v @@ -389,10 +389,10 @@ Definition apply_external_call ef (rel : RELATION.t) : RELATION.t := | Some bf => rel | None => kill_mem rel end - | EF_malloc (* FIXME *) + | EF_malloc (* would need lessdef *) | EF_external _ _ | EF_vstore _ - | EF_free (* FIXME *) + | EF_free (* would need lessdef? *) | EF_memcpy _ _ (* FIXME *) | EF_inline_asm _ _ _ => kill_mem rel | _ => rel @@ -476,7 +476,7 @@ Definition transf_instr (fmap : option (PMap.t RB.t)) | Some src => Iop Omove (src::nil) dst s end | Istore chunk addr args src s => - Istore chunk addr (subst_args fmap pc args) src s + Istore chunk addr (subst_args fmap pc args) (subst_arg fmap pc src) s | Icall sig ros args dst s => Icall sig ros (subst_args fmap pc args) dst s | Itailcall sig ros args => |