From ff62587774f6ca437c887cc3ff5d079895c5e214 Mon Sep 17 00:00:00 2001 From: Bernhard Schommer Date: Mon, 22 Jun 2015 23:49:11 +0200 Subject: Changed a minor typo: Pstwxu should be Pstwux --- powerpc/Asm.v | 4 ++-- powerpc/Asmexpand.ml | 2 +- powerpc/TargetPrinter.ml | 4 ++-- 3 files changed, 5 insertions(+), 5 deletions(-) (limited to 'powerpc') diff --git a/powerpc/Asm.v b/powerpc/Asm.v index d707b2b5..3fa7af31 100644 --- a/powerpc/Asm.v +++ b/powerpc/Asm.v @@ -260,7 +260,7 @@ Inductive instruction : Type := | Pstw: ireg -> constant -> ireg -> instruction (**r store 32-bit int *) | Pstwu: ireg -> constant -> ireg -> instruction (**r store 32-bit int with update *) | Pstwx: ireg -> ireg -> ireg -> instruction (**r same, with 2 index regs *) - | Pstwxu: ireg -> ireg -> ireg -> instruction (**r same, with 2 index regs and update *) + | Pstwux: ireg -> ireg -> ireg -> instruction (**r same, with 2 index regs and update *) | Pstw_a: ireg -> constant -> ireg -> instruction (**r store 32-bit quantity from int reg *) | Pstwx_a: ireg -> ireg -> ireg -> instruction (**r same, with 2 index regs *) | Pstwbrx: ireg -> ireg -> ireg -> instruction (**r store 32-bit int with reverse endianness *) @@ -878,7 +878,7 @@ Definition exec_instr (f: function) (i: instruction) (rs: regset) (m: mem) : out | Pstfdu _ _ _ | Psthbrx _ _ _ | Pstwu _ _ _ - | Pstwxu _ _ _ + | Pstwux _ _ _ | Psubfze _ _ | Psync | Ptrap diff --git a/powerpc/Asmexpand.ml b/powerpc/Asmexpand.ml index aec8f66e..699c841f 100644 --- a/powerpc/Asmexpand.ml +++ b/powerpc/Asmexpand.ml @@ -457,7 +457,7 @@ let expand_instruction instr = emit (Pstwu(GPR1, Cint(coqint_of_camlint adj), GPR1)) else begin emit_loadimm GPR0 (coqint_of_camlint adj); - emit (Pstwxu(GPR1, GPR1, GPR0)) + emit (Pstwux(GPR1, GPR1, GPR0)) end; emit (Pcfi_adjust (coqint_of_camlint sz)); if variadic then begin diff --git a/powerpc/TargetPrinter.ml b/powerpc/TargetPrinter.ml index 3789d62e..2d47acb0 100644 --- a/powerpc/TargetPrinter.ml +++ b/powerpc/TargetPrinter.ml @@ -620,8 +620,8 @@ module Target (System : SYSTEM):TARGET = fprintf oc " stwu %a, %a(%a)\n" ireg r1 constant c ireg r2 | Pstwx(r1, r2, r3) | Pstwx_a(r1, r2, r3) -> fprintf oc " stwx %a, %a, %a\n" ireg r1 ireg r2 ireg r3 - | Pstwxu(r1, r2, r3) -> - fprintf oc " stwxu %a, %a, %a\n" ireg r1 ireg r2 ireg r3 + | Pstwux(r1, r2, r3) -> + fprintf oc " stwux %a, %a, %a\n" ireg r1 ireg r2 ireg r3 | Pstwbrx(r1, r2, r3) -> fprintf oc " stwbrx %a, %a, %a\n" ireg r1 ireg r2 ireg r3 | Pstwcx_(r1, r2, r3) -> -- cgit