diff --git a/bower.json b/bower.json index 1c6a7c8..df13670 100644 --- a/bower.json +++ b/bower.json @@ -17,6 +17,6 @@ "package.json" ], "dependencies": { - "purescript-prelude": "^1.0.0" + "purescript-prelude": "^2.1.0" } } diff --git a/src/Data/Functor/Invariant.purs b/src/Data/Functor/Invariant.purs index 4a96015..54a6953 100644 --- a/src/Data/Functor/Invariant.purs +++ b/src/Data/Functor/Invariant.purs @@ -1,6 +1,5 @@ module Data.Functor.Invariant where -import Data.Function (const, (<<<)) import Data.Functor (class Functor, map) -- | A type of functor that can be used to adapt the type of a wrapped function @@ -25,4 +24,4 @@ instance invariantArray :: Invariant Array where -- | used as the `imap` implementation for any types that has an existing -- | `Functor` instance. imapF :: forall f a b. Functor f => (a -> b) -> (b -> a) -> f a -> f b -imapF = const <<< map +imapF f _ = map f