[project @ 2003-09-16 13:03:37 by simonmar]

[ghc-base.git] / GHC / Stable.lhs

diff --git a/GHC/Stable.lhs b/GHC/Stable.lhs
index 80af1f2..9a55a68 100644 (file)
--- a/GHC/Stable.lhs
+++ b/GHC/Stable.lhs
@@ -32,9 +32,6 @@ import GHC.IOBase
 
 data StablePtr a = StablePtr (StablePtr# a)
 
-instance CCallable   (StablePtr a)
-instance CReturnable (StablePtr a)
-
 newStablePtr   :: a -> IO (StablePtr a)
 newStablePtr a = IO $ \ s ->
     case makeStablePtr# a s of (# s', sp #) -> (# s', StablePtr sp #)