8 lines
109 B
Haskell
8 lines
109 B
Haskell
|
import Data.STRef
|
||
|
|
|
||
|
|
example :: ST s ()
|
||
|
|
example = do
|
||
|
|
p <- newSTRef 1
|
||
|
|
k <- readSTRef p
|
||
|
|
writeSTRef p (k+1)
|