X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FSTRef.hs;h=b185493a17756a4e344f64932ee31e59b3e97738;hb=6d89a2fe861274e66e6fa0a5cdd48b1161b33b75;hp=d261cbf9d2abdba59001751130af5d9eb7f5f704;hpb=9185a42d2848131d1272e79cf1e04430fb96b6d0;p=ghc-base.git

diff --git a/Data/STRef.hs b/Data/STRef.hs
index d261cbf..b185493 100644
--- a/Data/STRef.hs
+++ b/Data/STRef.hs
@@ -30,6 +30,10 @@ import GHC.STRef
 
 #ifdef __HUGS__
 import Hugs.ST
+import Data.Typeable
+
+#include "Typeable.h"
+INSTANCE_TYPEABLE2(STRef,stRefTc,"STRef")
 #endif
 
 -- |Mutate the contents of an 'STRef'