diff options
author | Cyril SIX <cyril.six@kalray.eu> | 2019-05-03 14:32:36 +0200 |
---|---|---|
committer | Cyril SIX <cyril.six@kalray.eu> | 2019-05-03 14:32:36 +0200 |
commit | 452da0d77523d15830d7a78198092d72822063a6 (patch) | |
tree | 273bf5fc7e715d80a75f5c83d06cfd32e9266d74 /test/monniaux/bitfields/bitfields_long.c | |
parent | 24e97bd87918f2c487416744ba12a78aba35a9e5 (diff) | |
parent | 9976dba5412be7e834abb63ac2293f1da288a185 (diff) | |
download | compcert-kvx-452da0d77523d15830d7a78198092d72822063a6.tar.gz compcert-kvx-452da0d77523d15830d7a78198092d72822063a6.zip |
Merge branch 'mppa-work' into mppa_k1c
Diffstat (limited to 'test/monniaux/bitfields/bitfields_long.c')
-rw-r--r-- | test/monniaux/bitfields/bitfields_long.c | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/test/monniaux/bitfields/bitfields_long.c b/test/monniaux/bitfields/bitfields_long.c new file mode 100644 index 00000000..93bba8d0 --- /dev/null +++ b/test/monniaux/bitfields/bitfields_long.c @@ -0,0 +1,19 @@ +#include <stdio.h> +#include <stdint.h> + +#define GET_FIELD_L(x, stop, start) (((x) << (63-(stop))) >> (63-(stop)+(start))) +#define FIELD_MASK(stop, start) ((1ULL<<(stop)) - (1ULL<<(start)) + (1ULL<<(stop))) + +#define SET_FIELD_L(x, stop, start, y) (((x) & ~FIELD_MASK(stop, start)) | ((y << start) & FIELD_MASK(stop, start))) + +uint64_t get_f2(uint64_t x) { + return GET_FIELD_L(x, 47, 16); +} + +uint64_t set_f2(uint64_t x, uint64_t y) { + return SET_FIELD_L(x, 47, 16, y); +} + +int main() { + printf("%lx %lx\n", FIELD_MASK(47, 16), set_f2(0x12345678ABCD1234ULL, 0x11112222ULL)); +} |