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

Reply via email to