[project @ 1999-02-02 13:18:57 by sof]
authorsof <unknown>
Tue, 2 Feb 1999 13:18:57 +0000 (13:18 +0000)
committersof <unknown>
Tue, 2 Feb 1999 13:18:57 +0000 (13:18 +0000)
Moved boundsOfByteArray out into exts/

ghc/lib/std/PrelArr.lhs

index 51508a3..331bc26 100644 (file)
@@ -259,13 +259,10 @@ newDoubleArray ixs = ST $ \ s# ->
     (# s2#, MutableByteArray ixs barr# #) }}
 
 boundsOfArray     :: Ix ix => MutableArray s ix elt -> (ix, ix)  
-boundsOfByteArray :: Ix ix => MutableByteArray s ix -> (ix, ix)
 
 {-# SPECIALIZE boundsOfArray     :: MutableArray s Int elt -> IPr #-}
-{-# SPECIALIZE boundsOfByteArray :: MutableByteArray s Int -> IPr #-}
 
 boundsOfArray     (MutableArray     ixs _) = ixs
-boundsOfByteArray (MutableByteArray ixs _) = ixs
 
 readArray      :: Ix ix => MutableArray s ix elt -> ix -> ST s elt