diff options
| author | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-09-03 11:08:25 +0200 |
|---|---|---|
| committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-09-03 11:08:25 +0200 |
| commit | 38959ad2b2d35a7d1b3479ef4298a5d754350cd8 (patch) | |
| tree | bfbdcf57b3035b1de721b6a900c70f1ddf94e3b7 /powerpc/TargetPrinter.ml | |
| parent | cfee340dc514e2cfbc5df910f7aa687e78a54d41 (diff) | |
| download | compcert-38959ad2b2d35a7d1b3479ef4298a5d754350cd8.tar.gz compcert-38959ad2b2d35a7d1b3479ef4298a5d754350cd8.zip | |
New builtin for dcbz instruction.
This commit adds a builtin for the dcbz instructions. Additionally
the dcbt,dcbtst,dcbtls and icbtls instruction are changed to their
actually form all taking one additional register in Asm.v.
Diffstat (limited to 'powerpc/TargetPrinter.ml')
| -rw-r--r-- | powerpc/TargetPrinter.ml | 18 |
1 files changed, 10 insertions, 8 deletions
diff --git a/powerpc/TargetPrinter.ml b/powerpc/TargetPrinter.ml index 6a583cca..ffd01b69 100644 --- a/powerpc/TargetPrinter.ml +++ b/powerpc/TargetPrinter.ml @@ -462,12 +462,14 @@ module Target (System : SYSTEM):TARGET = fprintf oc " dcbf %a, %a\n" ireg r1 ireg r2 | Pdcbi (r1,r2) -> fprintf oc " dcbi %a, %a\n" ireg r1 ireg r2 - | Pdcbt (c,r1) -> - fprintf oc " dcbt %ld, %a, %a\n" (camlint_of_coqint c) ireg GPR0 ireg r1 - | Pdcbtst (c,r1) -> - fprintf oc " dcbtst %ld, %a, %a\n" (camlint_of_coqint c) ireg GPR0 ireg r1 - | Pdcbtls (c,r1) -> - fprintf oc " dcbtls %ld, %a, %a\n" (camlint_of_coqint c) ireg GPR0 ireg r1 + | Pdcbt (c,r1,r2) -> + fprintf oc " dcbt %ld, %a, %a\n" (camlint_of_coqint c) ireg r1 ireg r2 + | Pdcbtst (c,r1,r2) -> + fprintf oc " dcbtst %ld, %a, %a\n" (camlint_of_coqint c) ireg r1 ireg r2 + | Pdcbtls (c,r1,r2) -> + fprintf oc " dcbtls %ld, %a, %a\n" (camlint_of_coqint c) ireg r1 ireg r2 + | Pdcbz (r1,r2) -> + fprintf oc " dcbz %a, %a\n" ireg r1 ireg r2 | Pdivw(r1, r2, r3) -> fprintf oc " divw %a, %a, %a\n" ireg r1 ireg r2 ireg r3 | Pdivwu(r1, r2, r3) -> @@ -536,8 +538,8 @@ module Target (System : SYSTEM):TARGET = fprintf oc " fsel %a, %a, %a, %a\n" freg r1 freg r2 freg r3 freg r4 | Picbi (r1,r2) -> fprintf oc " icbi %a,%a\n" ireg r1 ireg r2 - | Picbtls (n,r1) -> - fprintf oc " icbtls %ld, %a, %a\n" (camlint_of_coqint n) ireg GPR0 ireg r1 + | Picbtls (n,r1,r2) -> + fprintf oc " icbtls %ld, %a, %a\n" (camlint_of_coqint n) ireg r1 ireg r2 | Pisync -> fprintf oc " isync\n" | Plwsync -> |