X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2FRts.h;h=610cd701b3e33861eddc432a1eba4d3b7767fb94;hb=d92b6ce787e0a85ef99ef2ccd0a6a63665ea7f5c;hp=cec93e68b0db571e0cdb4c026dfd90d83e9cdfb1;hpb=c245355e6f2c7b7c95e9af910c4d420e13af9413;p=ghc-hetmet.git diff --git a/includes/Rts.h b/includes/Rts.h index cec93e6..610cd70 100644 --- a/includes/Rts.h +++ b/includes/Rts.h @@ -206,6 +206,8 @@ extern void stackOverflow(void); extern void __decodeDouble (MP_INT *man, I_ *_exp, StgDouble dbl); extern void __decodeFloat (MP_INT *man, I_ *_exp, StgFloat flt); +extern void __decodeDouble_2Int (I_ *man_high, I_ *man_low, I_ *exp, StgDouble dbl); +extern void __decodeFloat_Int (I_ *man, I_ *exp, StgFloat flt); #if defined(WANT_DOTNET_SUPPORT) #include "DNInvoke.h"