diff options
| author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-04-11 22:29:14 +0200 |
|---|---|---|
| committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-04-11 22:29:14 +0200 |
| commit | 4571fc5fade196c02d68c4feb5e5a1b862d37041 (patch) | |
| tree | 681f4992fee674059d6f8245e9e2b6da35256e2f /mppa_k1c/CBuiltins.ml | |
| parent | 9cdb61cc69db8fbb9bedfd3957b9512f8622fb7a (diff) | |
| download | compcert-kvx-4571fc5fade196c02d68c4feb5e5a1b862d37041.tar.gz compcert-kvx-4571fc5fade196c02d68c4feb5e5a1b862d37041.zip | |
more builtins
Diffstat (limited to 'mppa_k1c/CBuiltins.ml')
| -rw-r--r-- | mppa_k1c/CBuiltins.ml | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/mppa_k1c/CBuiltins.ml b/mppa_k1c/CBuiltins.ml index 914d1aa8..dfa11ba4 100644 --- a/mppa_k1c/CBuiltins.ml +++ b/mppa_k1c/CBuiltins.ml @@ -42,9 +42,9 @@ let builtins = { "__builtin_k1_set", (TVoid [], [TInt(IInt, []); TInt(IULongLong, [])], false); (* DONE *) (* LSU Instructions *) - (* No ACWS - __int128 *) - "__builtin_k1_afaddd", (TInt(IULongLong, []), [TPtr(TVoid [], []); TInt(ILongLong, [])], false); - "__builtin_k1_afaddw", (TInt(IUInt, []), [TPtr(TVoid [], []); TInt(IInt, [])], false); + (* afaddd and afaddw done using headers and assembly *) + "__builtin_k1_alclrd", (TInt(IULongLong, []), [TPtr(TVoid [], [])], false); (* DONE *) + "__builtin_k1_alclrw", (TInt(IUInt, []), [TPtr(TVoid [], [])], false); (* DONE *) "__builtin_k1_dinval", (TVoid [], [], false); (* DONE *) "__builtin_k1_dinvall", (TVoid [], [TPtr(TVoid [], [])], false); (* DONE *) "__builtin_k1_dtouchl", (TVoid [], [TPtr(TVoid [], [])], false); (* DONE *) |