[commit: ghc] type-holes-branch: Fix typo after merge. (387d1cf)
Simon Peyton Jones <[email protected]>
| Newsgroups | gmane.comp.lang.haskell.cvs.ghc |
|---|---|
| Message-ID | <[email protected]> |
Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : type-holes-branch http://hackage.haskell.org/trac/ghc/changeset/387d1cf7f291280bfc30ff2947dd44942354616b >--------------------------------------------------------------- commit 387d1cf7f291280bfc30ff2947dd44942354616b Author: Thijs Alkemade <[email protected]> Date: Thu Aug 30 22:07:55 2012 +0200 Fix typo after merge. >--------------------------------------------------------------- compiler/typecheck/TcSimplify.lhs | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/compiler/typecheck/TcSimplify.lhs b/compiler/typecheck/TcSimplify.lhs index 34bb74a..a925dfb 100644 --- a/compiler/typecheck/TcSimplify.lhs +++ b/compiler/typecheck/TcSimplify.lhs @@ -390,7 +390,7 @@ simplifyInfer _top_lvl apply_mr name_taus (untch,wanteds) -- Step 6) Final candidates for quantification ; let final_quant_candidates :: [PredType] - final_quant_candidates = map ctPred $ filter (not.isCHoleCan) $ bagToList + final_quant_candidates = map ctPred $ filter (not.isCHoleCan) $ bagToList $ keepWanted (wc_flat quant_candidates_transformed) -- NB: Already the fixpoint of any unifications that may have happened