Commit a5b86f36 authored by Ross Paterson's avatar Ross Paterson

Hugs only: fix signatures in Storable arrays

parent 679fc7f0
......@@ -1492,10 +1492,10 @@ unsafeReadMBArray (STUArray _ _ _ marr) = readMutableByteArray marr
unsafeWriteMBArray :: Storable e => STUArray s i e -> Int -> e -> ST s ()
unsafeWriteMBArray (STUArray _ _ _ marr) = writeMutableByteArray marr
getBoundsMBArray :: Storable e => STUArray s i e -> (i, i)
getBoundsMBArray :: Storable e => STUArray s i e -> ST s (i, i)
getBoundsMBArray (STUArray l u _ _) = return (l,u)
getNumElementsMBArray :: Storable e => STUArray s i e -> Int
getNumElementsMBArray :: Storable e => STUArray s i e -> ST s Int
getNumElementsMBArray (STUArray _ _ n _) = return n
instance MArray (STUArray s) Bool (ST s) where
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment