diff options
| author | Herbert Valerio Riedel <hvr@gnu.org> | 2014-09-17 17:54:20 +0200 |
|---|---|---|
| committer | Herbert Valerio Riedel <hvr@gnu.org> | 2014-09-17 17:55:37 +0200 |
| commit | b62bd5ecf3be421778e4835010b6b334e95c5a56 (patch) | |
| tree | e19e2efc012ec3940c4b4c739f0b1e8bcfed3eaf /rts/StgPrimFloat.h | |
| parent | 3c2829017943522a946e7ae0560034c7d28d96ce (diff) | |
| download | haskell-b62bd5ecf3be421778e4835010b6b334e95c5a56.tar.gz | |
Implement `decodeDouble_Int64#` primop
The existing `decodeDouble_2Int#` primop is rather inconvenient to use
(and in fact is not even used by `integer-gmp`) as the mantissa is split
into 3 components which would actually fit in an `Int64#` value.
However, `decodeDouble_Int64#` is to be used by the new `integer-gmp2`
re-implementation (see #9281).
Moreover, `decodeDouble_2Int#` performs direct bit-wise operations on the
IEEE representation which can be replaced by a combination of the
portable standard C99 `scalbn(3)` and `frexp(3)` functions.
Differential Revision: https://phabricator.haskell.org/D160
Diffstat (limited to 'rts/StgPrimFloat.h')
| -rw-r--r-- | rts/StgPrimFloat.h | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/rts/StgPrimFloat.h b/rts/StgPrimFloat.h index 57e9db1b91..d3911a13b9 100644 --- a/rts/StgPrimFloat.h +++ b/rts/StgPrimFloat.h @@ -12,6 +12,7 @@ #include "BeginPrivate.h" /* grimy low-level support functions defined in StgPrimFloat.c */ +StgInt __decodeDouble_Int64 (StgInt64 *mantissa, StgDouble dbl); void __decodeDouble_2Int (I_ *man_sign, W_ *man_high, W_ *man_low, I_ *exp, StgDouble dbl); void __decodeFloat_Int (I_ *man, I_ *exp, StgFloat flt); |