File tree Expand file tree Collapse file tree 1 file changed +5
-5
lines changed
Expand file tree Collapse file tree 1 file changed +5
-5
lines changed Original file line number Diff line number Diff line change @@ -14,19 +14,19 @@ import Prelude (Unit, unit)
1414foreign import data Ref :: Type -> Type
1515
1616-- | Create a new mutable reference containing the specified value.
17- foreign import newRef :: forall s r . s -> Effect (Ref s )
17+ foreign import newRef :: forall s . s -> Effect (Ref s )
1818
1919-- | Read the current value of a mutable reference
20- foreign import readRef :: forall s r . Ref s -> Effect s
20+ foreign import readRef :: forall s . Ref s -> Effect s
2121
2222-- | Update the value of a mutable reference by applying a function
2323-- | to the current value.
24- foreign import modifyRef' :: forall s b r . Ref s -> (s -> { state :: s , value :: b } ) -> Effect b
24+ foreign import modifyRef' :: forall s b . Ref s -> (s -> { state :: s , value :: b } ) -> Effect b
2525
2626-- | Update the value of a mutable reference by applying a function
2727-- | to the current value.
28- modifyRef :: forall s r . Ref s -> (s -> s ) -> Effect Unit
28+ modifyRef :: forall s . Ref s -> (s -> s ) -> Effect Unit
2929modifyRef ref f = modifyRef' ref (\s -> { state: f s, value: unit })
3030
3131-- | Update the value of a mutable reference to the specified value.
32- foreign import writeRef :: forall s r . Ref s -> s -> Effect Unit
32+ foreign import writeRef :: forall s . Ref s -> s -> Effect Unit
You can’t perform that action at this time.
0 commit comments