X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FLinker.c;h=db495dde78ee6267863ec5dc8b1a9ecf06f1e1d2;hb=6c48b36634d407bffc72a764d302f54da6748824;hp=bca60267c08a6f38d3a695837ec8d80fbff27b19;hpb=b27381f4e20a96aafc3402c925557090f9f2ac2e;p=ghc-hetmet.git

diff --git a/rts/Linker.c b/rts/Linker.c
index bca6026..db495dd 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -537,8 +537,10 @@ typedef struct _RtsSymbolVal {
       SymX(addDLL)               		\
       GMP_SYMS					\
       SymX(__int_encodeDouble)			\
+      SymX(__word_encodeDouble)			\
       SymX(__2Int_encodeDouble)			\
       SymX(__int_encodeFloat)			\
+      SymX(__word_encodeFloat)			\
       SymX(andIntegerzh_fast)			\
       SymX(atomicallyzh_fast)			\
       SymX(barf)				\