diff options
| author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-04-11 13:11:13 +0200 |
|---|---|---|
| committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-04-11 13:11:13 +0200 |
| commit | 9ff90aa440d195076a30fe4d8a055d050d84f726 (patch) | |
| tree | 415d9145ff9414b47370ac86c7c221fda694d628 /mppa_k1c/TargetPrinter.ml | |
| parent | 71bfa128316019b0199db87acdf31deb9f9e7405 (diff) | |
| download | compcert-kvx-9ff90aa440d195076a30fe4d8a055d050d84f726.tar.gz compcert-kvx-9ff90aa440d195076a30fe4d8a055d050d84f726.zip | |
data cache builtins
Diffstat (limited to 'mppa_k1c/TargetPrinter.ml')
| -rw-r--r-- | mppa_k1c/TargetPrinter.ml | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/mppa_k1c/TargetPrinter.ml b/mppa_k1c/TargetPrinter.ml index c67792e7..fc4d6ba6 100644 --- a/mppa_k1c/TargetPrinter.ml +++ b/mppa_k1c/TargetPrinter.ml @@ -298,6 +298,14 @@ module Target (*: TARGET*) = fprintf oc " barrier\n" | Pfence -> fprintf oc " fence\n" + | Pdinval -> + fprintf oc " dinval\n" + | Pdinvall addr -> + fprintf oc " dinvall 0[%a]\n" ireg addr + | Pdtouchl addr -> + fprintf oc " dtouchl 0[%a]\n" ireg addr + | Pdzerol addr -> + fprintf oc " dzerol 0[%a]\n" ireg addr | Pjumptable (idx_reg, tbl) -> let lbl = new_label() in |