diff options
| author | Sylvain Henry <sylvain@haskus.fr> | 2022-02-18 12:44:52 +0100 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-02-23 13:59:23 -0500 |
| commit | bc8de322d310d9dc879d3d3e7e0aa9157d8c2cf5 (patch) | |
| tree | b33660f0b9c248d83e2dea1d599f75716c9da549 /libraries | |
| parent | 6fa7591e832d71ebea452ee6ddf97ac513404576 (diff) | |
| download | haskell-bc8de322d310d9dc879d3d3e7e0aa9157d8c2cf5.tar.gz | |
NCG: inline some 64-bit primops on x86/32-bit (#5444)
Several 64-bit operation were implemented with FFI calls on 32-bit
architectures but we can easily implement them with inline assembly
code.
Also remove unused hs_int64ToWord64 and hs_word64ToInt64 C functions.
Diffstat (limited to 'libraries')
| -rw-r--r-- | libraries/ghc-prim/cbits/longlong.c | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/libraries/ghc-prim/cbits/longlong.c b/libraries/ghc-prim/cbits/longlong.c index 0631bdad58..46de69c340 100644 --- a/libraries/ghc-prim/cbits/longlong.c +++ b/libraries/ghc-prim/cbits/longlong.c @@ -79,9 +79,7 @@ HsInt64 hs_uncheckedIShiftRA64 (HsInt64 a, HsInt b) {return a >> b;} HsInt64 hs_intToInt64 (HsInt i) {return (HsInt64) i;} HsInt hs_int64ToInt (HsInt64 i) {return (HsInt) i;} -HsWord64 hs_int64ToWord64 (HsInt64 i) {return (HsWord64) i;} HsWord64 hs_wordToWord64 (HsWord w) {return (HsWord64) w;} HsWord hs_word64ToWord (HsWord64 w) {return (HsWord) w;} -HsInt64 hs_word64ToInt64 (HsWord64 w) {return (HsInt64) w;} #endif /* SUPPORT_LONG_LONGS */ |