diff options
author | Damien Doligez <damien.doligez-inria.fr> | 2013-04-18 13:52:32 +0000 |
---|---|---|
committer | Damien Doligez <damien.doligez-inria.fr> | 2013-04-18 13:52:32 +0000 |
commit | 012b6a8f1ac575dee54d63f5c9bf390626ae87d4 (patch) | |
tree | 29d57427e89fe6f0434b9f42f0f2bd2984de5237 /byterun | |
parent | 7c6c5dcf38d4f9fc5d692a8e47c685a50720dbd8 (diff) |
Large integer constants need to be suffixed by ULL to work on 32-bit machines
that support "long long".
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@13559 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun')
-rw-r--r-- | byterun/int64_native.h | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/byterun/int64_native.h b/byterun/int64_native.h index 09b5d65e8..e9ffe6749 100644 --- a/byterun/int64_native.h +++ b/byterun/int64_native.h @@ -49,13 +49,13 @@ #define I64_to_double(x) ((double)(x)) #define I64_of_double(x) ((int64)(x)) -#define I64_bswap(x) ((((x) & 0x00000000000000FF) << 56) | \ - (((x) & 0x000000000000FF00) << 40) | \ - (((x) & 0x0000000000FF0000) << 24) | \ - (((x) & 0x00000000FF000000) << 8) | \ - (((x) & 0x000000FF00000000) >> 8) | \ - (((x) & 0x0000FF0000000000) >> 24) | \ - (((x) & 0x00FF000000000000) >> 40) | \ - (((x) & 0xFF00000000000000) >> 56)) +#define I64_bswap(x) ((((x) & 0x00000000000000FFULL) << 56) | \ + (((x) & 0x000000000000FF00ULL) << 40) | \ + (((x) & 0x0000000000FF0000ULL) << 24) | \ + (((x) & 0x00000000FF000000ULL) << 8) | \ + (((x) & 0x000000FF00000000ULL) >> 8) | \ + (((x) & 0x0000FF0000000000ULL) >> 24) | \ + (((x) & 0x00FF000000000000ULL) >> 40) | \ + (((x) & 0xFF00000000000000ULL) >> 56)) #endif /* CAML_INT64_NATIVE_H */ |