diff options
| author |  xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2013-04-21 16:13:55 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2013-04-21 16:13:55 +0000 |
| commit | 9b2190b382036354e4ff7026d2cd8f3f4fe8337d (patch) | |
| tree | 3a3c9d6dc424e2c5dae0b09124ecb56ba9c95e09 /powerpc/PrintAsm.ml | |
| parent | 468f0c4407895557ca8089430f894a85f06afe97 (diff) | |
Fixes in PowerPC port
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2209 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'powerpc/PrintAsm.ml')
| -rw-r--r-- | powerpc/PrintAsm.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/powerpc/PrintAsm.ml b/powerpc/PrintAsm.ml index d48cffe..21b615b 100644 --- a/powerpc/PrintAsm.ml +++ b/powerpc/PrintAsm.ml @@ -447,7 +447,7 @@ let print_builtin_inline oc name args res = | "__builtin_bswap16", [IR a1], [IR res] -> fprintf oc " rlwinm %a, %a, 8, 16, 23\n" ireg GPR0 ireg a1; fprintf oc " rlwinm %a, %a, 24, 24, 31\n" ireg res ireg a1; - fprintf oc " or %a, %a, %a\n" ireg reg ireg GPR0 ireg res + fprintf oc " or %a, %a, %a\n" ireg res ireg GPR0 ireg res (* Float arithmetic *) | "__builtin_fmadd", [FR a1; FR a2; FR a3], [FR res] -> fprintf oc " fmadd %a, %a, %a, %a\n" freg res freg a1 freg a2 freg a3 |