diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 2015-08-22 09:46:37 +0200 |
|---|---|---|
| committer | Xavier Leroy <xavier.leroy@inria.fr> | 2015-08-22 09:46:37 +0200 |
| commit | 33dfbe7601ad16fcea5377563fa7ceb4053cb85a (patch) | |
| tree | 962468d4f01ae9620441a97082c826bc6fdf8c5a /backend/RTLgen.v | |
| parent | 4f187fdafdac0cf4a8b83964c89d79741dbd813e (diff) | |
| download | compcert-kvx-33dfbe7601ad16fcea5377563fa7ceb4053cb85a.tar.gz compcert-kvx-33dfbe7601ad16fcea5377563fa7ceb4053cb85a.zip | |
Renaming {BA,BR}_longofwords -> {BA,BR}_splitlong.
Use EF_debug instead of EF_annot for line number annotations.
Introduce PrintAsmaux.print_debug_info (very incomplete).
powerpc/Asmexpand: revise expand_memcpy_small.
Diffstat (limited to 'backend/RTLgen.v')
| -rw-r--r-- | backend/RTLgen.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/backend/RTLgen.v b/backend/RTLgen.v index 45ad8e19..d818de58 100644 --- a/backend/RTLgen.v +++ b/backend/RTLgen.v @@ -401,10 +401,10 @@ Fixpoint convert_builtin_arg {A: Type} (a: builtin_arg expr) (rl: list A) : buil | BA_addrstack ofs => (BA_addrstack ofs, rl) | BA_loadglobal chunk id ofs => (BA_loadglobal chunk id ofs, rl) | BA_addrglobal id ofs => (BA_addrglobal id ofs, rl) - | BA_longofwords hi lo => + | BA_splitlong hi lo => let (hi', rl1) := convert_builtin_arg hi rl in let (lo', rl2) := convert_builtin_arg lo rl1 in - (BA_longofwords hi' lo', rl2) + (BA_splitlong hi' lo', rl2) end. Fixpoint convert_builtin_args {A: Type} (al: list (builtin_arg expr)) (rl: list A) : list (builtin_arg A) := |