Skip to content

Commit feca0c8

Browse files
authored
Fix the asks function (#131)
1 parent 982fbbd commit feca0c8

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/Control/Comonad/Env/Class.purs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -15,7 +15,7 @@ class Comonad w <= ComonadAsk e w | w -> e where
1515
ask :: forall a. w a -> e
1616

1717
-- | Get a value which depends on the environment.
18-
asks :: forall e1 e2 w. ComonadEnv e1 w => (e1 -> e2) -> w e1 -> e2
18+
asks :: forall e1 e2 w a. ComonadAsk e1 w => (e1 -> e2) -> w a -> e2
1919
asks f x = f (ask x)
2020

2121
-- | The `ComonadEnv` type class extends `ComonadAsk` with a function

0 commit comments

Comments
 (0)