diff options
| author |  xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2011-05-23 07:43:21 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2011-05-23 07:43:21 +0000 |
| commit | 5b9d443a3a7f1be0e229bfc424dc857f080ef485 (patch) | |
| tree | 3d31b3e5df6861b5e4f538b0457880b129b8e5dd /ia32/CBuiltins.ml | |
| parent | 6507802928d50f97511c2cb8bca5c9bb389385e1 (diff) | |
Nicer printing of annotations.
ia32: support builtins for reversed reads and writes (facilitates testing).
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1655 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'ia32/CBuiltins.ml')
| -rw-r--r-- | ia32/CBuiltins.ml | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/ia32/CBuiltins.ml b/ia32/CBuiltins.ml index 14a2f10..9cd31da 100644 --- a/ia32/CBuiltins.ml +++ b/ia32/CBuiltins.ml @@ -28,5 +28,14 @@ let builtins = { (TFloat(FDouble, []), [TFloat(FDouble, []); TFloat(FDouble, [])], false); "__builtin_fmin", (TFloat(FDouble, []), [TFloat(FDouble, []); TFloat(FDouble, [])], false); + (* Memory accesses *) + "__builtin_read_int16_reversed", + (TInt(IUShort, []), [TPtr(TInt(IUShort, [AConst]), [])], false); + "__builtin_read_int32_reversed", + (TInt(IUInt, []), [TPtr(TInt(IUInt, [AConst]), [])], false); + "__builtin_write_int16_reversed", + (TVoid [], [TPtr(TInt(IUShort, []), []); TInt(IUShort, [])], false); + "__builtin_write_int32_reversed", + (TVoid [], [TPtr(TInt(IUInt, []), []); TInt(IUInt, [])], false); ] } |