diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2011-10-16 07:37:28 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2011-10-16 07:37:28 +0000 |
commit | 7e378c0215c99d7f8bd38341081ec04fd202fd0a (patch) | |
tree | 1a17a6568e1c421c2543d3576c97f9296ca15179 /powerpc | |
parent | e8bd77565422ab8e6d2fdd4ec7d5e7e4916ff2bd (diff) | |
download | compcert-7e378c0215c99d7f8bd38341081ec04fd202fd0a.tar.gz compcert-7e378c0215c99d7f8bd38341081ec04fd202fd0a.zip |
Revised emulation of packed structs
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1729 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'powerpc')
-rw-r--r-- | powerpc/CBuiltins.ml | 8 | ||||
-rw-r--r-- | powerpc/PrintAsm.ml | 8 |
2 files changed, 8 insertions, 8 deletions
diff --git a/powerpc/CBuiltins.ml b/powerpc/CBuiltins.ml index 6b683806..076288ed 100644 --- a/powerpc/CBuiltins.ml +++ b/powerpc/CBuiltins.ml @@ -50,13 +50,13 @@ let builtins = { [TFloat(FDouble, []); TFloat(FDouble, []); TFloat(FDouble, [])], false); (* Memory accesses *) - "__builtin_read_int16_reversed", + "__builtin_read16_reversed", (TInt(IUShort, []), [TPtr(TInt(IUShort, [AConst]), [])], false); - "__builtin_read_int32_reversed", + "__builtin_read32_reversed", (TInt(IUInt, []), [TPtr(TInt(IUInt, [AConst]), [])], false); - "__builtin_write_int16_reversed", + "__builtin_write16_reversed", (TVoid [], [TPtr(TInt(IUShort, []), []); TInt(IUShort, [])], false); - "__builtin_write_int32_reversed", + "__builtin_write32_reversed", (TVoid [], [TPtr(TInt(IUInt, []), []); TInt(IUInt, [])], false); (* Synchronization *) "__builtin_eieio", diff --git a/powerpc/PrintAsm.ml b/powerpc/PrintAsm.ml index 68e607b9..3b90ada8 100644 --- a/powerpc/PrintAsm.ml +++ b/powerpc/PrintAsm.ml @@ -450,13 +450,13 @@ let print_builtin_inline oc name args res = | "__builtin_fsel", [FR a1; FR a2; FR a3], FR res -> fprintf oc " fsel %a, %a, %a, %a\n" freg res freg a1 freg a2 freg a3 (* Memory accesses *) - | "__builtin_read_int16_reversed", [IR a1], IR res -> + | "__builtin_read16_reversed", [IR a1], IR res -> fprintf oc " lhbrx %a, %a, %a\n" ireg res ireg_or_zero GPR0 ireg a1 - | "__builtin_read_int32_reversed", [IR a1], IR res -> + | "__builtin_read32_reversed", [IR a1], IR res -> fprintf oc " lwbrx %a, %a, %a\n" ireg res ireg_or_zero GPR0 ireg a1 - | "__builtin_write_int16_reversed", [IR a1; IR a2], _ -> + | "__builtin_write16_reversed", [IR a1; IR a2], _ -> fprintf oc " sthbrx %a, %a, %a\n" ireg a2 ireg_or_zero GPR0 ireg a1 - | "__builtin_write_int32_reversed", [IR a1; IR a2], _ -> + | "__builtin_write32_reversed", [IR a1; IR a2], _ -> fprintf oc " stwbrx %a, %a, %a\n" ireg a2 ireg_or_zero GPR0 ireg a1 (* Synchronization *) | "__builtin_eieio", [], _ -> |