unboxed-references: A library for reference cells backed by unboxed-vectors

This package contains an interface to references backed by unboxed vectors

For an example of how to use it:

module Main where

import           Data.STRef.Unboxed
import           Control.Monad.ST

main :: IO ()
main =
do
print counter
print mySum
print strictModify

counter :: Int
counter =
runST $
do
ref <- newSTRefU 0
for_ [1..100] $ modifySTRefU ref (+ 1)
readSTRefU ref

mySum :: Int
mySum =
runST $
do
ref <- newSTRefU 0
for_ [1..10] $ i -> modifySTRefU ref (+ i)
readSTRefU ref

strictModify :: Int
strictModify =
runST $
do
ref <- newSTRefU 0
modifySTRefU ref (_ -> Unsafe.unsafePerformIO $ print "Got here!" >> pure 10)
writeSTRefU ref 42
readSTRefU ref

This gives the following:

> main
100
55
"Got here!"
42

• Data
  • STRef
    • Data.STRef.Unboxed