File tree Expand file tree Collapse file tree 1 file changed +2
-8
lines changed
cabal-install-solver/src/Distribution/Solver/Types Expand file tree Collapse file tree 1 file changed +2
-8
lines changed Original file line number Diff line number Diff line change 1+ {-# LANGUAGE DeriveFunctor #-}
12module Distribution.Solver.Types.Progress
23 ( Progress (.. )
34 , foldProgress
@@ -13,14 +14,7 @@ import Distribution.Solver.Compat.Prelude hiding (fail)
1314data Progress step fail done = Step step (Progress step fail done )
1415 | Fail fail
1516 | Done done
16-
17- -- This Functor instance works around a bug in GHC 7.6.3.
18- -- See https://gitlab.haskell.org/ghc/ghc/-/issues/7436#note_66637.
19- -- The derived functor instance caused a space leak in the solver.
20- instance Functor (Progress step fail ) where
21- fmap f (Step s p) = Step s (fmap f p)
22- fmap _ (Fail x) = Fail x
23- fmap f (Done r) = Done (f r)
17+ deriving (Functor )
2418
2519-- | Consume a 'Progress' calculation. Much like 'foldr' for lists but with two
2620-- base cases, one for a final result and one for failure.
You can’t perform that action at this time.
0 commit comments