diff options
| author | Xavier Leroy <xavier.leroy@inria.fr> | 2017-06-15 15:11:26 +0200 |
|---|---|---|
| committer | Bernhard Schommer <bschommer@users.noreply.github.com> | 2017-07-06 15:41:51 +0200 |
| commit | dff22ef6d855973e0e0f05c7203a6bfa9a4cf01a (patch) | |
| tree | 82c09b8cff023557084d6257acdef84b1311dd35 /common/PrintAST.ml | |
| parent | 92fc8a425034abc1247203a4c0d471e8b6d0e941 (diff) | |
| download | compcert-kvx-dff22ef6d855973e0e0f05c7203a6bfa9a4cf01a.tar.gz compcert-kvx-dff22ef6d855973e0e0f05c7203a6bfa9a4cf01a.zip | |
Extend builtin arguments with a pointer addition operator
This extension enables more addressing modes to be encoded as builtin arguments and used in conjunction with volatile memory accesses.
Current status: x86 port only, the only new addressing mode handled is reg + offset.
Diffstat (limited to 'common/PrintAST.ml')
| -rw-r--r-- | common/PrintAST.ml | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/common/PrintAST.ml b/common/PrintAST.ml index 48172dfd..ac7d2276 100644 --- a/common/PrintAST.ml +++ b/common/PrintAST.ml @@ -70,6 +70,9 @@ let rec print_builtin_arg px oc = function | BA_splitlong(hi, lo) -> fprintf oc "splitlong(%a, %a)" (print_builtin_arg px) hi (print_builtin_arg px) lo + | BA_addptr(a1, a2) -> + fprintf oc "addptr(%a, %a)" + (print_builtin_arg px) a1 (print_builtin_arg px) a2 let rec print_builtin_args px oc = function | [] -> () |