shithub: MicroHs

ref: 18820d704a3ca7b7ecdac94cbf067e5b2a60ad4f
dir: /lib/Data/IOArray.hs/

View raw version 
module Data.IOArray(module Data.IOArray, IOArray) where
import Prelude()              -- do not import Prelude
import Primitives

-- data IOArray

newIOArray :: forall a . Int -> a -> IO (IOArray a)
newIOArray = primArrAlloc

sizeIOArray :: forall a . IOArray a -> IO Int
sizeIOArray = primArrSize

readIOArray :: forall a . IOArray a -> Int -> IO a
readIOArray = primArrRead

writeIOArray :: forall a . IOArray a -> Int -> a -> IO ()
writeIOArray = primArrWrite