diff --git a/src/Prologue.hs b/src/Prologue.hs index 69353fd7b..65e391c83 100644 --- a/src/Prologue.hs +++ b/src/Prologue.hs @@ -55,6 +55,7 @@ import Data.Hashable as X (Hashable, hash, hashUsing, hashWithSalt) import Data.Hashable.Lifted as X (Hashable1(..), hashWithSalt1) import Data.Monoid as X (First (..), Last (..), Monoid (..)) import Data.Monoid.Generic as X +import Data.Profunctor.Unsafe import Data.Proxy as X (Proxy (..)) import Data.Semigroup as X (Semigroup (..)) import Data.Traversable as X @@ -85,6 +86,3 @@ eitherM :: Applicative f => (a -> f b) -> Either a b -> f b eitherM f = either f pure {-# INLINE eitherM #-} -(#.) :: Coercible b c => (b -> c) -> (a -> b) -> (a -> c) -(#.) _ = coerce -{-# INLINE (#.) #-}