diff options
| author | Ian Lynagh <ian@well-typed.com> | 2013-05-19 15:41:03 +0100 |
|---|---|---|
| committer | Ian Lynagh <ian@well-typed.com> | 2013-05-19 15:41:03 +0100 |
| commit | e20dfbcdaaa4c735d5adc235442716fc9597e4fd (patch) | |
| tree | 9ce4fdc13e35caff0101a7b88306db54fba93fe1 | |
| parent | a4cc7b11afe212a6b9965a406c791e669ea5fc5b (diff) | |
| download | haskell-e20dfbcdaaa4c735d5adc235442716fc9597e4fd.tar.gz | |
Expose __word_encode{Float,Double}; fixes integer-simple build
| -rw-r--r-- | includes/rts/PrimFloat.h | 2 | ||||
| -rw-r--r-- | rts/StgPrimFloat.h | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/includes/rts/PrimFloat.h b/includes/rts/PrimFloat.h index 7d137a7b6c..96a7d25df3 100644 --- a/includes/rts/PrimFloat.h +++ b/includes/rts/PrimFloat.h @@ -14,5 +14,7 @@ StgDouble __int_encodeDouble (I_ j, I_ e); StgFloat __int_encodeFloat (I_ j, I_ e); +StgDouble __word_encodeDouble (W_ j, I_ e); +StgFloat __word_encodeFloat (W_ j, I_ e); #endif /* RTS_PRIMFLOAT_H */ diff --git a/rts/StgPrimFloat.h b/rts/StgPrimFloat.h index 4f697c66e8..edd7b472b7 100644 --- a/rts/StgPrimFloat.h +++ b/rts/StgPrimFloat.h @@ -14,10 +14,8 @@ /* grimy low-level support functions defined in StgPrimFloat.c */ 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); -StgDouble __word_encodeDouble (W_ j, I_ e); -StgFloat __word_encodeFloat (W_ j, I_ e); -// __int_encodeDouble and __int_encodeFloat are public, declared in +// __{int,word}_encode{Float,Double} are public, declared in // includes/rts/PrimFloat.h. #include "EndPrivate.h" |