[commit: ghc] ghc-8.0: Comments only (ff6783d)
git at git.haskell.org
git at git.haskell.org
Fri Jan 22 12:19:39 UTC 2016
Repository : ssh://git@git.haskell.org/ghc
On branch : ghc-8.0
Link : http://ghc.haskell.org/trac/ghc/changeset/ff6783d6a245d53ae77649608d98e118c85db070/ghc
>---------------------------------------------------------------
commit ff6783d6a245d53ae77649608d98e118c85db070
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date: Wed Jan 20 14:09:35 2016 +0000
Comments only
(cherry picked from commit 6f95e23249c18d2e808b6586d2efecd3f3f0fb50)
>---------------------------------------------------------------
ff6783d6a245d53ae77649608d98e118c85db070
compiler/typecheck/TcSimplify.hs | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/compiler/typecheck/TcSimplify.hs b/compiler/typecheck/TcSimplify.hs
index 40edf93..81ea3aa 100644
--- a/compiler/typecheck/TcSimplify.hs
+++ b/compiler/typecheck/TcSimplify.hs
@@ -154,7 +154,7 @@ simpl_top wanteds
; if something_happened
then do { wc_residual <- nestTcS (solveWantedsAndDrop wc)
; try_class_defaulting wc_residual }
- -- See Note [Overview of implicit CallStacks]
+ -- See Note [Overview of implicit CallStacks] in TcEvidence
else try_callstack_defaulting wc }
try_callstack_defaulting :: WantedConstraints -> TcS WantedConstraints
@@ -166,7 +166,7 @@ simpl_top wanteds
-- | Default any remaining @CallStack@ constraints to empty @CallStack at s.
defaultCallStacks :: WantedConstraints -> TcS WantedConstraints
--- See Note [Overview of implicit CallStacks]
+-- See Note [Overview of implicit CallStacks] in TcEvidence
defaultCallStacks wanteds
= do simples <- handle_simples (wc_simple wanteds)
implics <- mapBagM handle_implic (wc_impl wanteds)
More information about the ghc-commits
mailing list