diff options
author | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-09-09 15:36:34 +0200 |
---|---|---|
committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2015-09-09 15:36:34 +0200 |
commit | 2dce91b8e2cae0b49c8870df6c727e25aaa180d8 (patch) | |
tree | 1b8bab698f77feb32bd2997911523cccd1e2924a /powerpc/CBuiltins.ml | |
parent | 62277541b0ea1c687c64df79a543f776b9f58f29 (diff) | |
download | compcert-2dce91b8e2cae0b49c8870df6c727e25aaa180d8.tar.gz compcert-2dce91b8e2cae0b49c8870df6c727e25aaa180d8.zip |
Add builtin for atomic load.
Implement the new __builtin_atomic_load(int *a, int *b); which stores
*a in *b. This differs from the atomic_load of the GCC, since the PPC
ISA manual states that you must jump before the load again if it fails.
Diffstat (limited to 'powerpc/CBuiltins.ml')
-rw-r--r-- | powerpc/CBuiltins.ml | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/powerpc/CBuiltins.ml b/powerpc/CBuiltins.ml index 1c7a3086..2013c9cf 100644 --- a/powerpc/CBuiltins.ml +++ b/powerpc/CBuiltins.ml @@ -121,7 +121,10 @@ let builtins = { (TInt (IInt, []),[TInt(IInt, []);TInt(IInt, []);TInt(IInt, [])],false); (* atomic operations *) "__builtin_atomic_exchange", - (TVoid [], [TPtr (TInt(IInt, []),[]);TPtr (TInt(IInt, []),[]);TPtr (TInt(IInt, []),[])],false) + (TVoid [], [TPtr (TInt(IInt, []),[]);TPtr (TInt(IInt, []),[]);TPtr (TInt(IInt, []),[])],false); + "__builtin_atomic_load", + (TVoid [], [TPtr (TInt(IInt, []),[]);TPtr (TInt(IInt, []),[])],false) + ] } |