X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FDynamic.hs;h=c67ea20ea1ea96f3a3a4b1857eba1fa7a23adc04;hb=bfdd52de414c485c3173b4c899d4a58b67dc725c;hp=275e3186b16a5d494c67390e68201047d32fcc32;hpb=a5f7dcaa3ebb00c8e6237f62b08ad9c2f65cfda7;p=ghc-base.git

diff --git a/Data/Dynamic.hs b/Data/Dynamic.hs
index 275e318..c67ea20 100644
--- a/Data/Dynamic.hs
+++ b/Data/Dynamic.hs
@@ -370,3 +370,8 @@ INSTANCE_TYPEABLE0(Word64,word64Tc,"Word64")
 INSTANCE_TYPEABLE0(TyCon,tyconTc,"TyCon")
 INSTANCE_TYPEABLE0(TypeRep,typeRepTc,"TypeRep")
 INSTANCE_TYPEABLE0(Dynamic,dynamicTc,"Dynamic")
+
+#ifndef __NHC__
+#include "Dynamic.h"
+INSTANCE_TYPEABLE1(IORef,ioRefTc,"IORef")
+#endif