Repository : http://darcs.haskell.org/ghc.git/
On branch : master https://github.com/ghc/ghc/commit/e20dfbcdaaa4c735d5adc235442716fc9597e4fd >--------------------------------------------------------------- commit e20dfbcdaaa4c735d5adc235442716fc9597e4fd Author: Ian Lynagh <[email protected]> Date: Sun May 19 15:41:03 2013 +0100 Expose __word_encode{Float,Double}; fixes integer-simple build >--------------------------------------------------------------- includes/rts/PrimFloat.h | 2 ++ rts/StgPrimFloat.h | 4 +--- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/includes/rts/PrimFloat.h b/includes/rts/PrimFloat.h index 7d137a7..96a7d25 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 4f697c6..edd7b47 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" _______________________________________________ ghc-commits mailing list [email protected] http://www.haskell.org/mailman/listinfo/ghc-commits
