summaryrefslogtreecommitdiff
path: root/libraries/base/Control/Monad/Fix.hs
diff options
context:
space:
mode:
authorFumiaki Kinoshita <fumiexcel@gmail.com>2019-05-05 13:25:15 +0900
committerMarge Bot <ben+marge-bot@smart-cactus.org>2019-06-18 16:00:20 -0400
commit62f0213d4db6020a0d1feb8512432dcad36f08de (patch)
treea8a0179571cfc23a251d817adcec42a9e85d618e /libraries/base/Control/Monad/Fix.hs
parent24afbfe9aacbb3f6a5cec8875ab100f0dfbe1bf8 (diff)
downloadhaskell-62f0213d4db6020a0d1feb8512432dcad36f08de.tar.gz
Data.Ord: give a field name getDown to Down
Diffstat (limited to 'libraries/base/Control/Monad/Fix.hs')
-rw-r--r--libraries/base/Control/Monad/Fix.hs1
1 files changed, 0 insertions, 1 deletions
diff --git a/libraries/base/Control/Monad/Fix.hs b/libraries/base/Control/Monad/Fix.hs
index d9a58485f2..96133777be 100644
--- a/libraries/base/Control/Monad/Fix.hs
+++ b/libraries/base/Control/Monad/Fix.hs
@@ -156,4 +156,3 @@ instance (MonadFix f, MonadFix g) => MonadFix (f :*: g) where
-- | @since 4.12.0.0
instance MonadFix Down where
mfix f = Down (fix (getDown . f))
- where getDown (Down x) = x