X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=GHC%2FInt.hs;h=e3d045dd765ee8951b589e6d7dbaf4a0268a20c9;hb=5ca4b4302f3e41760081ebd1ad9c193d59865698;hp=025ebdb497b17ca1341e8f65548692009021f607;hpb=be44c54248f9a5a5bd6168af464013b405c15aab;p=ghc-base.git

diff --git a/GHC/Int.hs b/GHC/Int.hs
index 025ebdb..e3d045d 100644
--- a/GHC/Int.hs
+++ b/GHC/Int.hs
@@ -41,9 +41,6 @@ import GHC.Show
 data Int8 = I8# Int# deriving (Eq, Ord)
 -- ^ 8-bit signed integer type
 
-instance CCallable Int8
-instance CReturnable Int8
-
 instance Show Int8 where
     showsPrec p x = showsPrec p (fromIntegral x :: Int)
 
@@ -150,9 +147,6 @@ instance Bits Int8 where
 data Int16 = I16# Int# deriving (Eq, Ord)
 -- ^ 16-bit signed integer type
 
-instance CCallable Int16
-instance CReturnable Int16
-
 instance Show Int16 where
     showsPrec p x = showsPrec p (fromIntegral x :: Int)
 
@@ -505,9 +499,6 @@ instance Bits Int32 where
 
 #endif 
 
-instance CCallable Int32
-instance CReturnable Int32
-
 instance Real Int32 where
     toRational x = toInteger x % 1
 
@@ -779,9 +770,6 @@ instance Bits Int64 where
 
 #endif
 
-instance CCallable Int64
-instance CReturnable Int64
-
 instance Real Int64 where
     toRational x = toInteger x % 1