My mistake:
instance Typeable a => Typeable (MVar a) where
typeOf (x::MVar x) =
mkAppTy (mkTyCon "Control.Concurrent.MVar.MVar") [typeOf (undefined::x)]
Keean.
_______________________________________________
Haskell-Cafe mailing list
[EMAIL PROTECTED]
http://www.haskell.org/mailman/listinfo/haskell-cafe
