[commit: ghc] master: Comments only (6f95e23)
git at git.haskell.org
git at git.haskell.org
Thu Jan 21 10:08:30 UTC 2016
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/6f95e23249c18d2e808b6586d2efecd3f3f0fb50/ghc
>---------------------------------------------------------------
commit 6f95e23249c18d2e808b6586d2efecd3f3f0fb50
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date: Wed Jan 20 14:09:35 2016 +0000
Comments only
>---------------------------------------------------------------
6f95e23249c18d2e808b6586d2efecd3f3f0fb50
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 c428ce9..9ea3d91 100644
--- a/compiler/typecheck/TcSimplify.hs
+++ b/compiler/typecheck/TcSimplify.hs
@@ -146,7 +146,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
@@ -158,7 +158,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