Skip to content

Commit 17ba6f9

Browse files
committed
Remove redundant constraints
1 parent ece2ad6 commit 17ba6f9

File tree

2 files changed

+3
-3
lines changed

2 files changed

+3
-3
lines changed

StateVar.cabal

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,5 @@
11
name: StateVar
2-
version: 1.1.0.0
2+
version: 1.1.0.1
33
synopsis: State variables
44
description:
55
This package contains state variables, which are references in the IO monad,

src/Data/StateVar.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -200,13 +200,13 @@ class HasSetter t a => HasUpdate t a b | t -> a b where
200200
-- | Transform the contents of a state variable with a given funtion.
201201
($~) :: MonadIO m => t -> (a -> b) -> m ()
202202
#if USE_DEFAULT_SIGNATURES
203-
default ($~) :: (MonadIO m, a ~ b, HasGetter t a, HasSetter t a) => t -> (a -> b) -> m ()
203+
default ($~) :: (MonadIO m, a ~ b, HasGetter t a) => t -> (a -> b) -> m ()
204204
($~) = defaultUpdate
205205
#endif
206206
-- | This is a variant of '$~' which is strict in the transformed value.
207207
($~!) :: MonadIO m => t -> (a -> b) -> m ()
208208
#if USE_DEFAULT_SIGNATURES
209-
default ($~!) :: (MonadIO m, a ~ b, HasGetter t a, HasSetter t a) => t -> (a -> b) -> m ()
209+
default ($~!) :: (MonadIO m, a ~ b, HasGetter t a) => t -> (a -> b) -> m ()
210210
($~!) = defaultUpdateStrict
211211
#endif
212212

0 commit comments

Comments
 (0)