diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 2015-08-24 18:19:58 +0200 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 2015-08-24 18:19:58 +0200 |
| commit | 3324ece265091490d5380caf753d76aeee059d3f (patch) | |
| tree | 14e42637915f2f39e11a53169bf4affd3cf7c2b3 /arm/Asmgen.v | |
| parent | e5be647428d5aa2139dd8fd2e86b8046b4d0aa35 (diff) | |
| download | compcert-kvx-3324ece265091490d5380caf753d76aeee059d3f.tar.gz compcert-kvx-3324ece265091490d5380caf753d76aeee059d3f.zip | |
Upgrade the ARM port to the new builtins.
Diffstat (limited to 'arm/Asmgen.v')
| -rw-r--r-- | arm/Asmgen.v | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/arm/Asmgen.v b/arm/Asmgen.v index 5a3a48e1..2365d1d2 100644 --- a/arm/Asmgen.v +++ b/arm/Asmgen.v @@ -727,9 +727,7 @@ Definition transl_instr (f: Mach.function) (i: Mach.instruction) OK (loadind_int IR13 f.(fn_retaddr_ofs) IR14 (Pfreeframe f.(fn_stacksize) f.(fn_link_ofs) :: Pbsymb symb sig :: k)) | Mbuiltin ef args res => - OK (Pbuiltin ef (map preg_of args) (map preg_of res) :: k) - | Mannot ef args => - OK (Pannot ef (List.map (map_annot_arg preg_of) args) :: k) + OK (Pbuiltin ef (List.map (map_builtin_arg preg_of) args) (map_builtin_res preg_of res) :: k) | Mlabel lbl => OK (Plabel lbl :: k) | Mgoto lbl => |