X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FLinker.c;h=04f272ceb23832058167cbe4dadfc4e46741c5cf;hb=e4417dcd4679da9c6b18c02ff667199c572bed89;hp=ebca998df4b582069b77a160f1e113854d7bf341;hpb=6ef2b1efafd8b2ba5a65594d1a5d17572b433a38;p=ghc-hetmet.git

diff --git a/rts/Linker.c b/rts/Linker.c
index ebca998..04f272c 100644
--- a/rts/Linker.c
+++ b/rts/Linker.c
@@ -537,6 +537,7 @@ typedef struct _RtsSymbolVal {
       SymX(addDLL)               		\
       GMP_SYMS					\
       SymX(__int_encodeDouble)			\
+      SymX(__2Int_encodeDouble)			\
       SymX(__int_encodeFloat)			\
       SymX(andIntegerzh_fast)			\
       SymX(atomicallyzh_fast)			\
@@ -556,6 +557,8 @@ typedef struct _RtsSymbolVal {
       SymX(createAdjustor)			\
       SymX(decodeDoublezh_fast)			\
       SymX(decodeFloatzh_fast)			\
+      SymX(decodeDoublezu2Intzh_fast)			\
+      SymX(decodeFloatzuIntzh_fast)			\
       SymX(defaultsHook)			\
       SymX(delayzh_fast)			\
       SymX(deRefWeakzh_fast)			\