summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Feuer <david.feuer@gmail.com>2014-11-23 22:00:48 +0100
committerHerbert Valerio Riedel <hvr@gnu.org>2014-11-23 22:02:20 +0100
commitcc7a735f015510dda6f69d4a48d1b0cdd55856ba (patch)
tree4872d558c2d97a62cd8a8b6538090b4d963f4930
parent96d29b5403bd8a6465a65a39da861f5b9610fc89 (diff)
downloadhaskell-cc7a735f015510dda6f69d4a48d1b0cdd55856ba.tar.gz
Define void using <$ (re #9827)
`() <$ x` is sometimes better than `fmap (const ()) x` and should never be worse. Reviewed By: ekmett Differential Revision: https://phabricator.haskell.org/D521
-rw-r--r--libraries/base/Data/Functor.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/libraries/base/Data/Functor.hs b/libraries/base/Data/Functor.hs
index 9db4c8fd5c..c12564f23c 100644
--- a/libraries/base/Data/Functor.hs
+++ b/libraries/base/Data/Functor.hs
@@ -23,7 +23,7 @@ module Data.Functor
void,
) where
-import GHC.Base ( Functor(..), const, flip )
+import GHC.Base ( Functor(..), flip )
-- $setup
-- Allow the use of Prelude in doctests.
@@ -140,4 +140,4 @@ infixl 4 $>
-- 2
--
void :: Functor f => f a -> f ()
-void = fmap (const ())
+void x = () <$ x